Регистрация
Войти
Стать экспертом Правила
Информатика

СРОЧНООООЗадание 2. Напишите алгоритм с циклом Repeat, вычисляющий квадраты N чисел, введенных с клавиатуры.Sqr(i) – вычисление квадрата числаЗадание 3. Напишите алгоритм с циклом Repeat, вычисляющий сумму 10 чисел,введенных с клавиатуры.S:=S+i; – накопление суммы чисел (сумматор)

ОТВЕТЫ

program z2;

var i,n: integer;

begin

write ('n = ');

readln (n);

repeat

write ('i = ');

readln (i);

writeln ('Sqr(',i,') = ',Sqr(i));

n:=n-1

until n=0;

end.

program z3;

var i,n,S: integer;

begin

n:=10;

repeat

write ('i = ');

readln (i);

S:=S+i;

n:=n-1

until n=0;

writeln('S = ',S)

end.

13
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам