Решить по информатике! найдите произведение первых десяти нечетных чисел. программа в паскале и, желательно, блок-схема. заранее .

Lovata Lovata    1   02.09.2019 10:00    0

Ответы
санти3 санти3  06.10.2020 11:40
Pascal:

Var
   A:byte;
   P:real;
Begin
P:=1;
For A:= 0 to 9 do
    P:=P*(A*2+1);
For A:= 0 to 8 do
    Write(A*2+1,'*');
WriteLn((A+1)*2+1,' = ',P)
End.

Решить по информатике! найдите произведение первых десяти нечетных чисел. программа в паскале и, жел
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика