Ответы на вопрос:
1 компьютер 2 учебник? 3 - 4 вырезать 5 редактор текста World 6 меню 7 файл 8 изображения ну или картинки 9 стрелки отмена и повтор
Var i,k,m,a: integer; begin write('n: '); readln(a); m: =0; for i: =0 to 6 do begin k: =(a shr (2*i))and 3; if k> m then m: =k end; writeln('max 4-ciffer is ', m); readln end.
Популярно: Информатика
-
onexochu19.06.2020 11:45
-
ппво09.01.2023 04:36
-
alexkis228vk25.07.2022 09:27
-
makshardin1710.05.2020 12:00
-
лев111001.09.2020 11:26
-
глаголица54512.03.2021 12:23
-
lizabezludnaya13.03.2021 13:26
-
unknown201524.02.2022 16:35
-
Innka89898921.12.2020 06:59
-
russalinagaras16.09.2022 15:40