30 1) выведите на экран 'сегодня понедельник' 2) выведете на экран на языке паскаль а> b, а> 35 3) сделайте запрос на ввод переменной и введите переменную 4) изобразите на языке паскаль, если а> b, то вывести значенин а на экран, иначе вывести b 5) введите с клавиатуры 2 любых числа, найдите их сумму, выведите на экран нужно!
144
407
Ответы на вопрос:
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
Популярно: Информатика
-
Вольха9705.01.2021 02:18
-
nagovitsynaari13.05.2020 18:56
-
Памагиш13.01.2022 18:51
-
гулие24.12.2021 00:27
-
darina09709.11.2020 06:48
-
mia01710.03.2022 17:01
-
2003tanya10.01.2023 07:31
-
genЕsis19.08.2020 15:53
-
beginfiu19.10.2021 19:12
-
anastaciarocha27.10.2021 09:12