tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти произведение чисел введеных
Найти произведение чисел введеных с клавиатуры, пока не будет введен 0
kvaki257989
3 09.07.2019 06:40
1
Ответы
jijafhv4636
16.09.2020 22:27
Var a,b:integer;
begin;
b:=1;
a:=1;
while a<>0 do
begin;
readln(a);
if a=0 then break;
b:=b*a;
end;
writeln(b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Джина0
03.03.2021 09:43
Y=x^2+5x+1 и Z=x^2+xy на языке Python...
BandiMatrix
03.03.2021 09:43
Дан программный код. Определи выходные данные. Х=25y=64if x y:print (x-y)else::print (x)2564...
irinaira72rt
25.09.2019 18:50
Каков информационный объем сообщения « и »( ковычки не считать) при мощности алфавита 256...
anya12345678900
14.11.2020 12:01
вас Заранее большое 8. Найдите ошибки в записи заголовков подпрограмм1) Procedure A (x+y); 2) Procedure A (10);3) Procedure A (X; Y); 4) Procedure A (X: integer,...
levgoncharenko
14.11.2020 12:00
В питоне! Ввести с клавиатуры натуральное число и найти сумму значений его цифр. Пример: Введите число: 1234 Cумма цифр 10 Составьте программу для питона...
vika3v
06.05.2021 16:27
Династия Хань начинает борьбу за города государства Восточного Тукерстана :Куча Турфан Хотан Кашгар и др Варианты: Во II д.н.э, В I д.н.э, В III д.н.э, во IV, во...
Виолетта0201
06.05.2021 16:27
Основою піраміди є трикутник зі стороною 8см і протилежним кутом 135 град. Бічні ребра утворюють із площиною основи кути 60град. Знайдіть висоту піраміди....
kseniyapolozhe
06.05.2021 16:28
2. Перепишіть, на місці крапок уставляючи дібрані з довідки узагальнювальні слова. 1. Ручку, олівці, фломастери, гумку, лінійку – ...повинен мати кожен школяр....
gelik7575
06.05.2021 16:28
Привет с прокачкой аккаунта У меня ник Kill you... Это мой ник...
mimimi055
06.05.2021 16:28
Укажите изменения, произошедшие в различных сферах культуры в связи с приходом Советской власти Литература Музыка Живопись Кинематограф...
Популярные вопросы
2 соединений с кислородом (оксидов) следующих химических элементо.3....
1
надо! Русский язык упражнения...
2
Как скачать ччиты наа амунг ас...
2
Үңгірдегі сыр» «Оқиға тауы» стратегиясының көмегімен шығарманың...
1
решить тест 1)Сколько выделяют главных классов соединений? 2...
1
Порівняйте спеціалізацію сільського господарства помірного та...
3
Это имена рек и озер, городов и деревень, поселков и железнодорожных...
2
Нужно ли ставить тире, ОБЪЯСНИТЕ Я этой песне не ровесник, она...
3
1. Сколько кг олова (при t = 232℃) расплавили, если потратили...
2
Решите задачу по математике и объяснить...
3
begin;
b:=1;
a:=1;
while a<>0 do
begin;
readln(a);
if a=0 then break;
b:=b*a;
end;
writeln(b);
end.