1. Информатика
  2. Дано натуральное число

Дано натуральное число n. вывести квадраты цифр заданного числа.

Lider4k Lider4k    1   02.09.2019 00:30    0

Ответы
lisi4ka228666 lisi4ka228666  06.10.2020 10:46
Var
   n:integer;
Begin
Write('n = ');
ReadLn(n);
While n > 0 do
   Begin
   Write(Sqr(n mod 10),' ');
   n:=n div 10
   End;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
2004Диана111111 2004Диана111111  29.06.2019 01:50
Сделать решето от 1 до 100: 1) выписать все натуральные числа от 1 до 100; 2) вычеркнуть 1; 3) подчеркнуть наименьшее из неотмеченных чисел; 4) вычеркнуть все числа,...
КамиLLочка КамиLLочка  15.12.2019 22:02
Поделитесь, , панченко в. - системный анализ, имитационное моделирование. в интернете в свободном доступе нет. в вк не нашел ( хотел узнать в этой книге (ах) про моделирование...
oytu oytu  15.12.2020 14:44
Проанализировав таблицу соотношений разрешения и диагонали экранов, выбрать только варианты сверх комфортных разрешений: 1. Разрешение (800*600)/диагональ 9 дюймов 2....
Сергей00431 Сергей00431  15.12.2020 14:44
Каких математических знаков нету в MS EXCEL: Произведения вычитания дроби сложения корня возведения в степень...
ttleuberlin ttleuberlin  15.12.2020 14:44
При форматировании слов изменяется... А) размер символов В) отступ абзаца С) расстояние между строками Д) все​...
alena5378 alena5378  17.09.2021 15:01
Выписать по 10 функций Вк и Телеги их различия...
Fgrtpo Fgrtpo  17.09.2021 15:02
Укажите К какому информационному действию соответствует осмотр достопримечательностей вашего города...
камила2010 камила2010  17.09.2021 15:05
Представим себе , что нужно внести изменения в картины или текст вышеуказанными . Поразмышляем, что для этого нужно сделать, сколько на уйдет времени, каких трудов это...
maximmaxtin maximmaxtin  25.10.2019 13:49
Составить таблицу использование заимствованных слов : подобрать не менее пяти аргументов за и против . по 10 слов, заимствованных из французского, греческого, , тюркского,...
СоняЗагребова5 СоняЗагребова5  25.10.2019 13:48
Расстояние между ближайшими гребнями и впадиноц 10м чему равна длина волны...

Популярные вопросы