Ошибка компиляции: error: assignment between incompatible sets - Free Pascal
Формулировка задачи:
Кто-нибудь знает как исправить эту ошибку?
ps2\sr.pas:13: error: assignment between incompatible sets
PROGRAM Sr(INPUT, OUTPUT); Type EnLetters = SET OF 'A'..'z'; RuLetters = SET OF 'A'..'я'; VAR Ch: CHAR; EnAccSymb: EnLetters; RuAccSymb: RuLetters; Is_Carry: BOOLEAN; BEGIN EnAccSymb := ['A'..'z']; RuAccSymb := ['A', 'а', 'Е', 'е', 'И', 'и', 'О', 'о', 'У', 'у', 'ы','Э', 'э', 'Ю', 'ю', 'Я', 'я', 'Ё', 'ё', 'Б'..'Д', 'б'..'д', 'Ж', 'ж', 'З', 'з', 'К'..'Н', 'к'..'н', 'П'..'Т', 'п'..'т', 'Ф'..'Щ', 'ф'..'щ', 'ь', 'ъ']; Is_Carry := FALSE; WHILE NOT EOLN DO BEGIN READ(Ch); IF (Ch IN EnAccSymb) OR (Ch IN RuAccSymb) THEN WRITELN(Ch, ' is in AccSymb') ELSE WRITELN(Ch, ' is not in AccSymb') END END.
Решение задачи: «Ошибка компиляции: error: assignment between incompatible sets»
textual
Листинг программы
>fpc a Free Pascal Compiler version 2.6.4 [2014/03/06] for i386 Copyright (c) 1993-2014 by Florian Klaempfl and others Target OS: Win32 for i386 Compiling a.pas a.pas(9,3) Note: Local variable "Is_Carry" is assigned but never used Linking a.exe 26 lines compiled, 0.2 sec , 26512 bytes code, 1740 bytes data
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д