СРОЧНО! 30 баллов 1) Выведите ** экран 'сегодня понедельник' 2) Выведете ** экран **...

Question

СРОЧНО! 30 баллов 1) Выведите на экран 'сегодня понедельник' 2) Выведете на экран на языке Паскаль а>b, а>35 3) Сделайте запрос на ввод переменной и введите переменную 4) Изобразите на языке Паскаль, если а>b, то вывести значенин а на экран, иначе вывести b 5) Введите с клавиатуры 2 любых числа, найдите их сумму, выведите на экран ОЧЕНЬ СРОЧНО НУЖНО!

Answer 1

1)

• begin
• write('сегодня понедельник');
• end.

2)

• begin
• write('a>b, a>35');
• end.

3)

• var x:integer;
• begin
• read(x);
• end.

4)

• var a,b:integer;
• begin
• readln(a,b);
• if a>b then write(a)
• else write(b);
• end.

5)

• var x,y,z:integer;
• begin
• readln(x,y);
• z:=x+y;
• write(z);
• end.