Есть ответ 👍

Написать программу которая подсчитывает произведение целых чисел введеных с клавиатуры. произведение подсчитывается до тех пор пока вводятся числа в интервале -10 до +10

154
389
Посмотреть ответы 2

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


Var a,p: integer; begin p: =1; repeat readln(a); if (a> =-10) and (a< =10) then   p: =p*a;   until (a> 10) or (a< -10);   write(p)   end.
alina3013
4,4(61 оценок)

1,  2, 4

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