1. Информатика
  2. Напишите функцию, которая

Напишите функцию, которая будет проверять, является ли число четным. функция должна иметь тип boolean, а в качестве параметра ей будет передаваться целое число.

TIPOcrytou TIPOcrytou    2   24.06.2019 21:50    0

Ответы
Dalishka808 Dalishka808  02.10.2020 10:36
function proverka(i :integer):boolean;
begin if i mod 2=0 then
proverka:=true
else
proverka:=false;
end;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
NedFlanders NedFlanders  23.05.2020 10:23
Сообщение, информационный объем которого равен 4 Кбайт, занимает 4 страницы по 32 строки, в каждой из которых записано 32 символа. Сколько символов в алфавите, на котором записано...
МаминаГадость12 МаминаГадость12  22.05.2020 10:23
4. Между населёнными пунктами A, B, C, D, E построены дороги, протяжённость которых приведена в таблице A B C D EA 3 5 B 3 1 6 C 5 1 4 1D 6 4 3E 1 3 Определите длину кратчайшего пути...
natali3171 natali3171  22.05.2020 10:23
очень Определи значения переменных a и b после выполнения фрагмента алгоритма. В ответ запишите сначала a потом b через точку с запятой без пробел a:=42; b:=14; a:=a div b b:=a *...
Kuznetsova8903 Kuznetsova8903  22.05.2020 10:23
Что такое формальные языки? Язык точных наук Язык на котором общаются люди Алфавит русского языка Язык, который создают люди Что является долговременной памятью в компьютере? Оперативная...
HiDolr HiDolr  23.12.2020 21:25
Решить задачи табличным После соревнований бегунов на табло появилась надпись: Рустам не был вторым. Эдуард отстатл от Рустама на два места. Яков не был первым. Галина не была не...
Hhhlff Hhhlff  23.12.2020 21:28
SketchUp Make программасындағы терезе элементтерін жазыңыздар​...
Ganna003 Ganna003  30.01.2021 12:10
Что делает данная программа? program n_1; var a: integer; z: array [1..50] of integer; begin for a := 1 to 50 do begin z[a] := random(201) - 100; if z[a] 0 then write(z[a], ); end;...
двоишник54 двоишник54  30.01.2021 12:13
Напишите программу вычисления среднего арифметического трёх целых случайных чисел, принадлежащих промежутку [0;10). Предусмотрите вывод на экран случайных чисел, сгенерированных компьютером​...
Odessey20011 Odessey20011  22.06.2019 01:10
Найди спрятанные фамилии хорошо известных тебе писателей не пойму зачем ил на дне реки...
Smaik111 Smaik111  09.06.2019 22:20
Как начать писать рассказ? на тему смешной случай лета...

Популярные вопросы