Дано целое число а(а> 2).определить является ли число чётным или нечётным (последовательно вычитаем из из числа а число 2 и определяем остаток)
158
373
Ответы на вопрос:
При деление на два остаток только 1 или 0, выполняем вычитание пока а больше 1 var a: integer; begin writeln('введите число а'); readln(a); while a> 1 do a: =a-2; if a=0 then writeln('а - четное, остаток ',a) else writeln('а - нечетное, остаток ',a) end.
изначально пользователь находился в каталоге c: \work\9class\documents и работал с файлом anketa.doc.
переход на 1 уровень вверх: c: \work\9class.
новый каталог: c: \work\9class\otchet.
полное имя состоит из адреса папки и имени файла: c: \work\9class\otchet\anketa.doc [2]
Популярно: Информатика
-
Роли518.04.2022 20:44
-
франческа03331.10.2022 22:38
-
Ника26040617.04.2021 07:51
-
ntisdeil201002.09.2021 08:48
-
Diana45111113.04.2022 07:15
-
tana281125.03.2020 02:13
-
Otlichnisa14045516.02.2020 03:45
-
JasminNuar54416.10.2021 17:11
-
vt50521.04.2021 12:14
-
мария238425.03.2022 16:21