Паскаль абс
2 задачи
1)Написать программу выводящую на экран последовательность чисел от 1 до 10 через пробел в строчку.
2)Написать программу которая бы выводила на экран произведение нечетных чисел от 10 до 20.

Есть ответ
18.12.2022
364

Ответ


Пожалуйста:

 

1) 

program posledovat1;var  w:integer;

 

begin

 

w:=0;repeat

  w:=w+1;  write(w,' ');until w=10

 

end.

 

2)

program nechet1;var  i,pr:integer;

 

begin

 

pr:=1;for i:=11 to 20 do  if i mod 2 = 1 then    pr:=pr*i;    writeln(pr);

end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.