[РЕШЕНО]: Не работает inc И dec - Паскаль, Turbo Pascal, PascalABC.NET

Sustanon · 14.02.2017, 18:28

Шалом! Недавно изучаю паскаль и не получается писать с Inc и Dec, пример

Код:

program tt;
var a,b: real;
begin
Write('Введите число: ');
Read(a);
b:=1;
if a>0 then Inc(a,b) else Dec(a,b);
Write('Ответ: ',a);
end.

Что не так?

Решение в следующем сообщении

BDA · 14.02.2017, 18:39

Первый аргумент Inc и Dec должен быть типа ordinal (перечислимый), а real не перечислимый. А второй аргумент должен быть integer типа.

Sustanon · 14.02.2017, 22:35

Integer помогло, код заработал, благодарствую

14.02.2017, 18:28	#1
Sustanon Новичок Джуниор Регистрация: 14.02.2017 Сообщений: 2	[РЕШЕНО]: Не работает inc И dec Шалом! Недавно изучаю паскаль и не получается писать с Inc и Dec, пример Код: `program tt; var a,b: real; begin Write('Введите число: '); Read(a); b:=1; if a>0 then Inc(a,b) else Dec(a,b); Write('Ответ: ',a); end.` Что не так? Решение в следующем сообщении Последний раз редактировалось Вадим Мошев; 12.05.2018 в 13:37.

14.02.2017, 18:39	#2
BDA МегаМодератор СуперМодератор Регистрация: 09.11.2010 Сообщений: 7,429	Первый аргумент Inc и Dec должен быть типа ordinal (перечислимый), а real не перечислимый. А второй аргумент должен быть integer типа. Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Перевод из HEX в DEC (из 16 в 10)	spcallisto	SQL, базы данных	1	22.01.2013 13:42
Dec to hex	Gausse	Общие вопросы Delphi	3	14.06.2011 11:44
HEX и DEC	yuta_86	Общие вопросы Delphi	7	12.01.2011 10:17
Dec to Hex to Dec translator	Alex Cones	Софт	0	16.05.2010 20:05
HEX ->DEC	69_rus	Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM	1	13.06.2007 20:44

14.02.2017, 22:35	#3
Sustanon Новичок Джуниор Регистрация: 14.02.2017 Сообщений: 2	Integer помогло, код заработал, благодарствую