Информатика

Написать программу, которая бы по введенному номеру года 1 — зима, 2-весна, 3-лето, 4-осень выдавала соответствующие этому времени года месяцы, количе

Написать программу, которая бы по введенному номеру года (1 - зима, 2-весна, 3-лето, 4-осень) выдавала соответствующие этому времени года месяцы, количество дней в каждом из месяцев) begin var a: integer; 3 : writeln("Июнь: 30 Июль: 31 Август:31"); 2 : writeln("Март: 31 Апрель: 30 Май: 31"); 4 : writeln("Сентябрь:30 Октябрь:31 Ноябрь:30"); 1 : writeln("Декабрь: 31 Январь:(...)

Читать далее >

Кто придумал интернет?

Кто придумал интернет? Именно в 1991 году эта паутина стала доступной для всех и каждого. Её созданием занимались:образоват.учреждения,исследовательские центры, именно они и являются соподвижниками этой всемирной паутины.Создателем этой глобальной сети  считается  математик Тимоти Джон Бернерс-Ли. Эта глобальная сеть была первночально создана американцами для военных целей,она была названа ARPANET.

Читать далее >

Скорость звездолета 100 км/час. Звездолет летит до некоторой звезды, свет от которой до Земли идет 14 минут. Определить, сколько времени потребует

 1. Скорость звездолета 100 км/час. Звездолет летит до некоторой звезды, свет от которой до Земли идет 14 минут. Определить, сколько времени потребуется звездолету, чтобы долететь до данной звезды. Решить на Паскале. 2.В равнобедренном прямоугольном треугольнике известна высота, опущенная на гипотенузу. Найти стороны треугольника. Решить в Паскале. Спасибо writeln("Founded. It is near ", dist); const spd,elt:long;(...)

Читать далее >

Определить, что будет напечатано в результате работы след программы. Алгоритм яз :АлгНач цел b , c b := 0 c := 0 нц пока b 10 c := c + b b :=

Определить, что будет напечатано в результате работы след программы . Алгоритм яз : Алг Нач   цел b , c    b := 0   c := 0   нц пока b <> 10    c := c + b   b := b + 1  кц вывод c  желательно с обьяснением Все эти строки(...)

Читать далее >

1Какой объём видеопамяти в килобайтах нужен для хранения изображения размером 600 Х 350 пикселей, использующего 8-цветную палитру? 2Придумайте способ

1)Какой объём видеопамяти в килобайтах нужен для хранения изображения  размером 600 Х 350 пикселей, использующего 8-цветную палитру?     2)Придумайте способ кодировки цветов для 64-цветной палитры.    3) Сколько цветов можно максимально использовать для хранения изображений размером 350*200 пикселей, если объём страницы видеопамяти-65 Кбайт?    4) Сколько цветов буцдет в палитре, если каждый базовый цвет(...)

Читать далее >

Как созхдать свой сайт через фар менеджер ?

как созхдать свой сайт через фар менеджер ? какое отношение имеет сайт к школе?   Вот пример простейшего html -документа. сайт через Far Manager можно только залить на сервер по протоколу FTP, Alt-F1-FTP-Shift-F4  вводишь там строку доступа типа: ftp://adress.ru а также имя пользователя и пароль. Сами же html страницы лучше создавать в Notepad++ так как(...)

Читать далее >

Составте алгоритм нахождения наименьшего из трех значений. ееееееееее!

Составте алгоритм нахождения наименьшего из трех значений.Помогитеееееееееее! Успехов!            x = Min(x,A(ц)); КонецЦикла;           Возврат(а);      КонецЕсли;       Если a<b Тогда Допустим, в языке есть встроенная функция   Функция Min(a,b)           Возврат(b);   Min(a,b) которая определяет мин из двух значений.(...)

Читать далее >

10 КЛАСС! ПАСКАЛЬ АБС! ! ! Дан массив Аn. Опередлите кол-во нечет элементов массиава, стоящих на четных местах. выведите н

10 КЛАСС! ПАСКАЛЬ АБС!! СРОЧНО!! ПОМОГИТЕ ПОЖАЛУЙСТА!     Дан массив А(n). Опередлите кол-во нечет элементов массиава, стоящих на четных местах. выведите на экран исходный массив и найденное кол-во. const n = 15;var  a: array[1..n] of integer;  i, count: integer;begin  for i := 1 to n do begin    a[i] := random(100);    write(a[i], '(...)

Читать далее >