@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
  • Вопрос задан
  • 105 просмотров
Решения вопроса 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;
Ответ написан
Пригласить эксперта
Ваш ответ на вопрос

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

Войти через центр авторизации
Похожие вопросы
Avtoapp Москва
До 120 000 руб.
Medialooks Калининград
от 100 000 до 150 000 руб.
Medialooks Калининград
от 170 000 до 200 000 руб.
20 июн. 2019, в 10:48
5000 руб./за проект
20 июн. 2019, в 10:25
3500 руб./за проект
20 июн. 2019, в 10:21
5000 руб./за проект