almosya2005
02.10.2020 05:49

Переведите с паскаля на кумир, надо
var n,k: integer;
begin
write('n=');
readln(n);
k: =1;
while k*k< =n do
begin
writeln(k*k);
k: =k+1;
end;
end.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
мивое
27.08.2020 19:55

цел n, k

алг

нач

вывод 'n='

ввод n

k := 1

нц пока k * k <= n

вывод k * k, нс

k := k + 1

кц

кон

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота