Блок схему этой задачи написать программу которая запрашивает 7 чисел и выводит их произведение
Начало: program p1; uses crt; var a,b,c,d,e,f,g,p:integer; begin Ввод 7 чисел: read( a,b,c,d,e,f,g); Происходит умнож: p:=a*b*c*d*e*f*g; Вывод: write(p); Конец: end.