Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
6 раз
Выполнил:
>>> for i in range(1, 12, 2):
... i
1
3
5
7
9
11
>>>
s : = 1 ;
for i : = 1 to n do
if a[i] mod 3 = 0 then
s : = s * a[i];
writeln(s);
если я парвильно понял , то вотvar x,y : integer;
begin
readln(x);
if x> =0 then y: =1
esle y: = 0;
writeln(y);
end.
Популярные вопросы