1)
Begin
var a,b:integer;
WriteLN('Введите градус: ');
ReadLN(a);
if a > 600 then begin
WriteLN('Пожарная ситуация')
end;
if b < 600 then begin
WriteLN('Рабочая ситуация')
end;
end.
2)
Begin var a:integer;
WriteLN('Введите номер дня недели: ');
ReadLN(a);
if a = 1 then begin
WriteLN('Понедельник-Количество уроков: 6')
end;
if a = 2 then begin
WriteLN('Вторник-Количество уроков: 6')
end;
if a = 3 then begin
WriteLN('Среда-Количество уроков: 6')
end;
if a = 4 then begin
WriteLN('Четверг-Количество уроков: 6')
end;
if a = 5 then begin
WriteLN('Пятница-Количество уроков: 6')
end;
if a = 6 then begin
WriteLN('Суббота-Количество уроков: 6')
end;
end.
Приложения специального назначения предназначены для профессионального использования в различных сферах деятельности квалифицированными пользователями: - издательские системы; - бухгалтерские программы; - системы автоматизированного проектирования (САПР); - программы компьютерного моделирования; - математические пакеты; - геоинформационные системы; - медицинские экспертные системы.
Слово Александр занимает 72 бит
Всего цветов N=2. По формуле N=2^i узнаём, что вес одного символа, в данном случае значение цвета для одного пикселя равно 1. Количество пикселей обозначается буквой K и равно 52*14. По формуле I=K*i узнаём
I=52*14*1=728 бит
Ответ :
в ) отделяет один раздел програми от другого...