Регистрация
nikafolz
07.06.2020 23:12
Информатика
Есть ответ 👍

Оформить для кумира. напишите программу, которая получает два целых числа a и b (0 < a < b) и выводит квадраты всех натуральных чисел в интервале от a до b. пример: введите два целых числа: 10 12 10*10=100 11*11=121 12*12=144
(обязательно для кумира)

216
482
Посмотреть ответы 2

Ответы на вопрос:

санти3
санти3
4,4(42 оценок)

ответ: var a,b,c: integer;

begin

writeln('введите 2 целых числа');

readln(a,b);

for c: =a to b do

begin

writeln(c,'*',c,'=',sqr(c));

end;

end.

masha859689
masha859689
4,6(49 оценок)
Ну хьюстон почти все уже сделал. я чуток подправил var i,j,s,n: integer;   begin readln(n); for i : = 1 to n-1 do     begin     s: =0;     for j : = 1 to (i div 2) do       if i mod j=0 then s: =s+j;     if s=i then write(i,' ');     end; end.

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