Написать в паскале 1 Вывести ** экран все двузначные числа в строку через пробел 2...

+460 голосов
297k просмотров

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


Информатика (18 баллов) | 297k просмотров
Дан 1 ответ
+121 голосов

Задание 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.

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

(3.7k баллов)