Есть ответ 👍

Составить программу, которая находит произведение всех натуральных чисел от 1 до 4 (для приложения паскаль)

131
468
Посмотреть ответы 1

Ответы на вопрос:


Program chik3; const n=50; var a,b: array[1..30]of real; i: integer; p: real; beginp: =1; for i: =1 to n dobeginread(a[i]); if(a[i]< =2)then p: =p*a[i]; end; writeln(p);   end.  

Популярно: Информатика