Даны целые числа Kamp;gt;0 и N (N = K+5). Вывести N

Даны целые числа Kgt;0 и N (N = K+5). Вывести N раз число K. Через оператор while

Задать свой вопрос
Анатолий Петроченко
VarK,N,i:integer;BeginWrite('K = ');ReadLn(K);N:=K+5;i:=0;While i
Валентина Смурницина
Спасибо огромное!
1 ответ
Program n1;
var k,n,i: integer;
begin
readln(k);
n:=k+5;
i:=0;
while ilt;gt;n do
begin
i:=i+1;
write(k,' ');
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт