Taugan2015
27.02.2022 19:11

1. дано три числа. вычислить сколько раз встречается среди них число 5. 2. даны два числа. если больше первое число, то заменить его на сумму этих чисел. если больше второе, то заменить его полусумму этих чисел. 3. даны четыре числа. найти наименьшее число из данных. 4. постороить трассировочную таблицу а: =4; с: =-3; у: =2; if ay then a: =a+10 else c: =c*10; y: =y*20;

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Asuacom
26.08.2020 23:15
Var a, b, c, d:integer;beginreadln (a, b, c);while a>0 dobeginif a mod 10=5 then d:=d+1;a:=a div 10;end;while b>0 dobeginif b mod 10=5 then d:=d+1;b:=b div 10;end;while c>0 dobeginif c mod 10=5 then d:=d+1;c:=c div 10;end;writeln (d);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота