Войти Регистрация Спроси ai-bota

Как с цикла while вывести на экран квадраты всех цифр

Ответ:

DanProGold

24.09.2020 08:24

{PascalABC}

var a:integer;
begin
while a<10 do begin
write(a*a,' ');
a:=a+1;
end;
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Амира573

25.07.2022 22:19

Какие вы используете информационнно комуникационно технологии в процессе обучения? (Привести примеры сайтов, материалов которые вам в обучении)...

Kulimshina

30.08.2022 04:14

Укажите, как называется исполнитель, от которого не требуется понимания сущности алгоритма, он лишь в точности выполняет команды алгоритма, не нарушая их последовательности?...

6Анна111111111111111

03.06.2020 07:57

4. Установите соответствие между архивирующими программами и их расширением...

NikaName007

22.06.2020 20:01

Отметьте наиболее популярные сервисы (услуги) сети Интернет: 1. Сервисы коллективного взаимодействия; 2. Всемирная паутина; 3. Все перечисленное; 4. Файловые архивы; 5....

Nastya28612

15.06.2021 03:28

Почему не открываются ответы...

skymiss

07.10.2020 23:21

какой атрибут тега body устанавливает фон веб-страницы...

kostf2003

23.03.2022 02:35

Кто в паскале разбирается Найти сколько чисел, введенных с клавиатуры пользователем оканчиваются на 3 (количество чисел, которые ввел пользователь известно) 2) Найти произведение...

LERA13511

23.09.2021 20:24

Что производит следующий фрагмент программы? for i:=1 to n do write(a[i],); Выберите один из 4 вариантов ответа: a) Ввод элементов массива с клавиатуры b) Вывод элементов...

lenkindom1

05.02.2021 04:56

Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 5. Программа получает на вход количество чисел в последовательности,...

ПеЧеНьКаСМоЛоЧкОм

05.02.2021 04:56

Согласно какой записи идет уменьшение каждого элемента массива вдва раза?...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку