Напечатать столбиком все целые чётные числа от 14 до 24 и

Напечатать столбиком все целые чётные числа от 14 до 24 и квадраты этих чисел. Решение вида:
Число Квадрат
14 196
16 256
18 324
20 400
22 441
24 576

Задать свой вопрос
Тимур Мерцедин
22^2 не равно 441 ))) Даже без вычислений ясно, что квадрат четного числа не может быть нечетным. 441 - это квадрат 21.
1 ответ
Var
  i:integer;
begin
  Writeln('Число   Квадрат');
  i:=14;
  while ilt;=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


, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт