Предмет:
ИнформатикаАвтор:
pollardАвтор:
ozzydorseyАвтор:
travis75Автор:
clementinekuviАвтор:
gianaАвтор:
pintoАвтор:
music manbsemProgram n_1;
var i:integer;
begin
i:=0;
repeat
writeln('Вячеслав');
i:=i+1;
until (i=10);
end.
Каким образом это оформить, у меня нет предположений. Если под оформлением подразумевается что-либо конкретное - напишите - я дополню ответ. Программа рабочая, дает верный ответ.
Автор:
alaynaесть 2 варианта :
program imya;
Begin
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
writeln ( ' Vyacheslav ' );
end.
или
var name, fam:string;
i:integer;
begin
For i:=1 to 8 do
Writeln( ' Vyacceslav');
Readln;
end.
Автор:
sharonwigginsДобавить свой ответ
Предмет:
ГеометрияАвтор:
poncioloveОтветов:
Смотреть
Предмет:
МХКАвтор:
rangersosaОтветов:
Смотреть
Предмет:
ПсихологияАвтор:
coraparksОтветов:
Смотреть
Предмет:
Английский языкАвтор:
kennetholsonОтветов:
Смотреть