Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов
Перезагрузить страницу Подпрограммы
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
юра 3 юра 3 вне форума
Новичок
 
Сообщений: 8
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 30.12.2008
По умолчанию Подпрограммы - 30.12.2008, 17:37

Помогите решить задачу

Напишите функцию, возвращающую true, если переданное ей в параметре число является четным, и false – в противном случае.
Ответить с цитированием
  (#2 (permalink)) Старый
Матрикс Матрикс вне форума
Member
 
Сообщений: 1,751
Сказал(а) спасибо: 0
Поблагодарили 3 раз(а) в 3 сообщениях
Регистрация: 12.04.2007
По умолчанию 30.12.2008, 17:41

так используйте операторы if и then
Ответить с цитированием
  (#3 (permalink)) Старый
Vladimir_S Vladimir_S вне форума
Member
 
Сообщений: 423
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
По умолчанию 30.12.2008, 21:23

Ладно, только по случаю праздника:

Function f(a:integer):boolean;
VAR b:boolean;
BEGIN
If a mod 2 = 0 then b:=TRUE else b:=FALSE;
f:=b;
END;

С наступающим!
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подпрограммы (процедуры и функции) DmiTpi4 Pascal 4 07.05.2011 23:48
Определить подпрограммы вычисления расстояния Berens Вопросы начинающих программистов 1 30.10.2010 21:49
подпрограммы.... radeon37 Pascal 0 25.05.2010 17:57
Подпрограммы Perekryostok Pascal 1 10.05.2010 19:12
Параметры в подпрограммы передавать через стек FCMZ Assembler 5 28.03.2009 19:16
Разработка подпрограммы работы с приоритетной очередью FIFO nygger Вопросы начинающих программистов 4 15.12.2006 18:43



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов