Составить 3 программы в цикле for,repeat и while вывести числа на экран от 1 до 10 в столбик !!!Срочно !!! Нужно на завтра пожалуйста !!!
egor222777:
Эх,слишком много просишь и мало даешь.Так тебе мало кто поможет.
Ответы на вопрос
Ответил elenaklon
1
1.
var i:integer;
begin
for i:=1 to 10 do
writeln(i)
end.
2.
var i:integer;
begin
i:=1;
while i<=10 do
begin
writeln(i);
i:=i+1;
end
end.
3.
var i:integer;
begin
i:=1;
repeat
writeln(i);
i:=i+1;
until i>10
end.
var i:integer;
begin
for i:=1 to 10 do
writeln(i)
end.
2.
var i:integer;
begin
i:=1;
while i<=10 do
begin
writeln(i);
i:=i+1;
end
end.
3.
var i:integer;
begin
i:=1;
repeat
writeln(i);
i:=i+1;
until i>10
end.
Новые вопросы