< >

Как с помощью цикла repeat until вывести на экран квадраты всех цифр(Паскаль)

Ответы

Ответ дал: danyamaster100
1

Program asdasd;

uses crt;

const Stop = 16;

var i,n: integer;

begin

clrscr;

Write('N = '); ReadLn(N);

I:=N;

repeat

WriteLn(i*i);

i:=i+1;

until i > Stop;

end.

Ответ:

Объяснение:

maindog03: а что нужно поменять, чтобы программа показала только числа в квадрате от 5 до 9
Похожие вопросы
Английский язык
1 год назад
Помогите нужно срочно Спасибо заранее! Упр 2
Русский язык
1 год назад
Номер 70 срочно пожалуйста
География
2 года назад
СРОЧНО СРОЧНО Задание7. Приведите доказательства черт характеристики ЭГП Казахстана.  СРОЧНО СРОЧНО ДАМ 50 БАЛЛОВ!!!​
Химия
2 года назад
Як очистити воду? Описати процес.Які явища відбуваються при цьому?
Алгебра
8 лет назад
35 БАЛЛОВ ДАЮ. ПОМОГИТЕ ПОЖАЛУЙСТА
Физика
8 лет назад
Физика.Дано r=10^-15метров, p=1,6×10^-19. Найти:силу кулона
Математика
9 лет назад
36+х=64+7 поймите решить
Математика
9 лет назад
1. Представьте число –4,2 а) в виде суммы трех равных слагаемых; б) в виде суммы двух слагаемых, одно из которых противоположно данному числу. 2 –40,3 < х < 38,9.