Предмет: Информатика,
автор: baralllek
Помогите , пожалуйста, написать программу на паскале ! :)))
1
1 3
1 3 5
1 3 5 7
1 3 5 7 9
нужно вывести числа в таком порядке ( в паскале)
Ответы
Автор ответа:
0
var
a,b,i,i2:integer;
Begin
Readln(a);
b:=1;
for i:=1 to a do begin
if b mod 2 = 0 then b:=b+1;
for i2:=1 to b do if i2 mod 2 <>0 then Write(i2,' ');
b:=b+1;
Writeln();
end;
End.
a,b,i,i2:integer;
Begin
Readln(a);
b:=1;
for i:=1 to a do begin
if b mod 2 = 0 then b:=b+1;
for i2:=1 to b do if i2 mod 2 <>0 then Write(i2,' ');
b:=b+1;
Writeln();
end;
End.
Автор ответа:
0
этот знак
Автор ответа:
0
:)
Автор ответа:
0
это не равно
Автор ответа:
0
не так
Автор ответа:
0
это "не равно"
Похожие вопросы
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: Svyat001
Предмет: Литература,
автор: mrtrueclown