Ребят, помоги в паскале. напишите программу которая вводит с клавиатуры числа до тЕх пор пока не будет введено число 0. В конце работы программы на экран выводится сумма и произведение введенных чисел.
Ех пор пока не будет введено число 0. В конце работы программы на экран выводится сумма и произведение введенных чисел.
Ответы:
27-12-2018 07:37
Var a,s,p:integer;beginp:=1;read(a);if(a=0) then p:=0;while(a<>0)do begin s+=a; p*=a; read(a); end;writeln(s, , p);end.
Также наши пользователи интересуются:
Чем была обусловлена необходимость столь радикального решения вопросов о мире и ?Сообщение(краткое) на тему "Первый человек в космосе"! Срочно надо!!!!
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Ребят, помоги в паскале. напишите программу которая вводит с клавиатуры числа до т» от пользователя Olga Isaeva в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!