Есть ответ 👍

Дано целое число а(а> 2).определить является ли число чётным или нечётным (последовательно вычитаем из из числа а число 2 и определяем остаток)

158
373
Посмотреть ответы 2

Ответы на вопрос:


При деление на два остаток только 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]

Популярно: Информатика