program prim1;
uses CRT;
var
a,i: integer;
begin
read(a);
i:=1;
while i<10 do
begin
i:=i+1;
write(a);
end;
end.
Это программа для того чтобы вывести 10 одинаковых чисел на экран. Помогите пожалуйста переделать так, чтобы можно было вывести слово ПРИВЕТ 10 раз. программа pascalABC.
Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.