Выпишите формулу устанавливающую связь между Количество символов в сообщение И информационным весом одного символа
145
274
Ответы на вопрос:
program money;
label 1;
var
x,y,z : smallint;
begin
1 : writeln('введите 3 купюры до 5000');
readln(x,y,z);
if ((x > 5000) or (y > 5000) or(z > 5000) ) then goto 1;
if (x> y) and (x> z) then writeln('максимальная купюра = ','1') else
if (y> x) and (y> z) then writeln('максимальная купюра = ', '2') else
if (z> x) and (z> y) then writeln('максимальное купюра = ', '3');
end.
вот , код проверил , проблем возникнуть не должно.
Популярно: Информатика
-
lizafedkovich25.05.2023 04:34
-
Elizzzavettta05.09.2021 14:08
-
алик14309.06.2020 15:16
-
pziipzii15.08.2020 09:53
-
mmrkrolik19.07.2021 10:42
-
Almas17179510.03.2023 09:52
-
y233445520.01.2021 17:00
-
наука2814.11.2020 21:16
-
liza128811.01.2023 23:03
-
котан614.04.2022 12:49