Предмет: Информатика,
автор: taku1992
вывести 10 первых чисел так чтобы последующее было на 10 больше предыдущего.Первое число -2
stalcat45:
да
первое число не минус 2,а просто 2
хорошо
var
i,a,x:integer;
begin
a:=2;
for i:=1 to 10 do begin
a:=a+10;
writeln(a);
end;
end.
i,a,x:integer;
begin
a:=2;
for i:=1 to 10 do begin
a:=a+10;
writeln(a);
end;
end.
Ответ: var
i,a,x:integer;
begin
a:=2;
for i:=1 to 10 do begin
a:=a+10;
writeln(a);
end;
end.
i,a,x:integer;
begin
a:=2;
for i:=1 to 10 do begin
a:=a+10;
writeln(a);
end;
end.
Составьте программу к задаче : Вывести 20 первых чисел так чтобы каждое последующее было на 1 меньше предыдущего . Первое число 25
помогите решить
минутку
i,a,x:integer;
begin
a:=25;
for i:=1 to 20do begin
a:=a-1;
writeln(a);
end;
end.
begin
a:=25;
for i:=1 to 20do begin
a:=a-1;
writeln(a);
end;
end.
спасибо большое
Ответы
Автор ответа:
0
-2, 8, 18, 28, 38, 48, 58, 68, 78, 88, 98
мне на паскале нужно
и тем более это неправильно
Автор ответа:
0
-2, 8, 18, 28, 38, 48, 58, 68, 78, 88
Похожие вопросы
Предмет: Информатика,
автор: chp4la
Предмет: История,
автор: danaranurseitova9
Предмет: История,
автор: bondarsm15
Предмет: Математика,
автор: fanay
Предмет: Математика,
автор: Аноним