@temirlan_official

В паскальABC работает, а в делфи 7 выходит ошибка. Как исправить?

function IsVowel(var ch:char):boolean;
const len = 10;
var
  arr: array[1..10] of char = ('А', 'У', 'О', 'Ы', 'И', 'Е', 'Ё', 'Я', 'Ю', 'Э');
	i: integer;
begin
	IsVowel := false;
	for i := 1 to len do
		if arr[i] = ch THEN
			IsVowel := true
end;


[Error] Project2.dpr(16): Cannot initialize local variables
  • Вопрос задан
  • 127 просмотров
Решения вопроса 2
@StockholmSyndrome
локальные переменные нельзя сразу инициализировать (можно, начиная с Delphi 10.3 Rio (инлайн переменные))
так как элементы массива не изменяются, то можно сделать константу
const arr: array[1..10] of string = ('А', 'У', 'О', 'Ы', 'И', 'Е', 'Ё', 'Я', 'Ю', 'Э');


P.S. а вообще да, лучше сделать, как SagePtr посоветовал
Ответ написан
tsklab
@tsklab
Здесь отвечаю на вопросы.
function IsVowel(var ch:char):boolean;
begin
  Result := Pos( ch, 'АУОЫИЕЁЯЮЭ') > 0
end;
Ответ написан
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы