Даны целые числа K больше 0 и N (N = K+5). Вывести N раз число K. Через оператор while
Даны целые числа K>0 и N (N = K+5). Вывести N раз число K. Через оператор while
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
var k,n,i: integer;
begin
readln(k);
n:=k+5;
i:=0;
while i<>n do
begin
i:=i+1;
write(k,' ');
end;
end.
Не нашли ответ?
Похожие вопросы