Вывести в столбик кубы целых чисел от 10 до 20, используя цикл while
Вывести в столбик кубы целых чисел от 10 до 20, используя цикл while
Гость
Ответ(ы) на вопрос:
Гостьvar
i:integer;
begin
i:=10;
while i<21 do
begin
writeln(i*i*i, ', '); i:=i+1;
end; end.
Не нашли ответ?
Похожие вопросы