Question

Написать в паскале
1 Вывести на экран все двузначные числа в строку через пробел
2 Напишите программу, которая 7 раз выводит на экран "Черненко Семён"
3 Напишите программу, которая вычисляет сумму всех четных чисел в диапазоне от 1 до n.

Answer 1

Задание 1:

• begin
• for var x := 10 to 99 do print(x);
• end.

Задание 2:

• begin
• loop 7 do println('Черненко Семён')
• end.

Задание 3:

• begin
• (1..ReadInteger('n:')).Where(x->x.isEven).Sum.Print
• end.

Пример работы: