1. Информатика
  2. Написать программу, которая вычисляет

Написать программу, которая вычисляет произведение чисел, введенных с клавиатуры, пока не введено «0». использовать цикл с постусловием. pascal

ZickAndRick ZickAndRick    3   12.07.2019 17:50    0

Ответы
ksenyarobulet ksenyarobulet  15.09.2020 13:48
Var a,b:integer;
begin
readln(a,b);
if (a=0) or (b=0) then writeln('Операция не выполнена, т.к введен 0')
else writeln(a*b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
vladislavkraso vladislavkraso  19.10.2020 03:52
Перечислите Задачи операционной системы: 1.2.3....
АндрейXXXМ АндрейXXXМ  12.05.2020 14:49
Скільки бібліотек можна імпортувати в один проект?...
0rus0 0rus0  06.10.2019 20:05
1.каков был бы диапазон значений целых чисел, если бы для их хранения использовалась 16-разрядная ячейка? 2.запишите внутреннее представление следующих десятичных чисел, используя...
ArinaM25 ArinaM25  19.05.2020 17:01
Написати програму, яка створює вікно, у вікні напис зі своїм прізвищем та кнопку зі своїм іменем. Розміри та кольори обрати на власний смак. Имя и фамилию сделайте любую я потом...
  19.05.2020 17:02
Использовать чертежник алг нач поднять перо сместиться в точку 0,15 опустить перо сместиться на вектор 13,-7 сместиться на вектор 0,-16 сместиться на вектор -13,-7 сместиться на...
вовчик83 вовчик83  19.05.2020 17:03
1. Какие цели преследует организация обслуживания средств вычислительной техники?2. Какая нормативно-правовая база должна соблюдаться при установке и эксплуатации средств вычислительной...
ПомогитеЯАуист ПомогитеЯАуист  12.08.2019 07:30
1) зачем необходимо при отладке программы тестировать все ветви 2) может ли оператор if входить в другой if и как в этом случаи он работает?...
SRALIK SRALIK  03.10.2019 00:30
За 6 хвилин тіло здійснило 800 коливань.який шлях пройшло тіло за цей час, якщо амплітуда коливань 5см...
dariasit dariasit  03.10.2019 00:30
Вкаждой клетке таблицы 3×3 записано число. произведение чисел в любом столбце и в любой строке равно 3, а произведение чисел в любом квадрате 2×2 равно 1. найдите сумму чисел в...
Nemuverus Nemuverus  03.10.2019 00:30
Put the sports from ex1 under the correct heading...

Популярные вопросы