Есть ответ 👍

30 1) выведите на экран 'сегодня понедельник' 2) выведете на экран на языке паскаль а> b, а> 35 3) сделайте запрос на ввод переменной и введите переменную 4) изобразите на языке паскаль, если а> b, то вывести значенин а на экран, иначе вывести b 5) введите с клавиатуры 2 любых числа, найдите их сумму, выведите на экран нужно!

144
407
Посмотреть ответы 2

Ответы на вопрос:


1)

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

2)

beginwrite('a> b, a> 35'); end.

3)

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

4)

var a,b: integer; beginreadln(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.


Vb. dim i as integer dim massiv() as integer for i = 0 to massiv.length - 1             massiv(i) += 4 next

Популярно: Информатика