Var a,k,b,c: longint; begin read (a); k: =a div 100; b: =a div 10 mod 10; c: =a mod 10; if ((k> b) and (k> c)) then writeln (k) else if ((b> k) and (b> c)) then writeln (b) else if ((c> b) and (c> k)) then writeln (c); end.
Спасибо
Ответ дал: Гость
интерфейс, ёмкость, размер, время произвольного доступа, скорость вращения шпинделя, надежность, количество операций ввода-вывода в секунду, потребление энергии, сопротивляемость ударам, скорость передачи данных, объем буфера.
(жирным шрифтом для всех, обычным для жестких, флеш и тд.)
Ответ дал: Гость
1)7-5=2 уч.-имеют две "3" по и по . 2)17-4-5-2=6 уч.-имеют две "3" по и по . 3)22-5-2-11=4 уч.-имеют две "3" по и по . 4)40-22-4-6-4=4 уч.-учатся без "3". 5)6+2+4=12 уч.-имеют "3" по двум предметам из трёх.
Другие вопросы по: Информатика
Похожие вопросы
Знаешь правильный ответ?
Дано трёхзначное число. найти в нём максимальную цифру. 20 паскаль...
Популярные вопросы