Задать вопрос
13 октября, 19:02

Напечатать столбиком все целые чётные числа от 14 до 24 и квадраты этих чисел. Решение вида:

Число Квадрат

14 196

16 256

18 324

20 400

22 441

24 576

+1
Ответы (1)
  1. 13 октября, 21:07
    0
    Var

    i:integer;

    begin

    Writeln ('Число Квадрат') ;

    i:=14;

    while i<=24 do

    begin Writeln (i:4, sqr (i) : 9) ; i:=i+2 end

    end.

    Результат выполнения программы:

    Число Квадрат

    14 196

    16 256

    18 324

    20 400

    22 484

    24 576
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напечатать столбиком все целые чётные числа от 14 до 24 и квадраты этих чисел. Решение вида: Число Квадрат 14 196 16 256 18 324 20 400 22 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы