Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/18: Рейтинг темы: голосов - 18, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 24.05.2019
Сообщений: 66

Пишет неизвестное имя (a), как исправить ?

03.10.2019, 08:38. Показов 4124. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
type
  mn2 = set of 'a'..'z';
 
procedure vvod(var a: mn2);
var
  i: integer;
  mn1: char;
begin
  while true do
  begin
    writeln('Введите букву: ');
    readln(mn1);
    if mn1 in a then
    begin
      writeln('Такая буква уже есть: ', mn1);
      break;
    end
    else
      a := a + [mn1];
    for i := 0 to 255 do 
      if chr(i) in a then
        write(chr(i), ' ');
    writeln;
  end;
  writeln('Программа завершила свою работу.');
  readln;
end;
 
begin
  vvod(a);
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
03.10.2019, 08:38
Ответы с готовыми решениями:

Объясните в чем ошибка пишет неизвестное имя типа mas
Procedure INIT (var d:mas) var t:byte; begin writeln('vvedite ',n,' elementov'); for I:= 1 to 30 do readln(D=random(60)-20 ...

Выводит ошибку неизвестное имя типа "Text" как испрвить?
program Crypt; var key, text, longkey, result : string; i : integer; toto, c : char; F : Text; begin writeln('введите...

Ошибка в Паскаль "Неизвестное имя b"
program matrica; type massiv = array of int; var i, j, c, b: int; m: massiv; begin writeln('Введите размерность матрицы');...

1
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,158
Записей в блоге: 1
03.10.2019, 09:05
Pascal
28
var a: mn2;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
03.10.2019, 09:05
Помогаю со студенческими работами здесь

Ошибка "Неизвестное имя типа"
program lab10; uses crt; var F: Text; slovo: string; i: integer; begin clrscr; Assign(F,'E:\Name.txt'); reset(F);

Неизвестное имя "t1"
program ss_ek; var V1:real; V2:real; Vср:real; begin writeln ('Вычисление средней скорости'); write ('Введите V1>>'); ...

Неизвестное имя Detect, как преобразовать на паскальАБС
program Z_4_1; Uses Crt, Graph; {const h=200;} var grDrive: Integer; grMode: Integer; x0, y0: Integer; a:...

Неизвестное имя
Здравствуйте, в программе, в разделе var указываю переменную логического (boolean) типа, в процедуре присваиваю ей значение, выдает:...

Неизвестное имя 'textBox1'
Выдаёт ошибку, хотя я всё указал Unit Unit7; interface uses System, System.Drawing, System.Windows.Forms, Unit3; type ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
ПЛИС
zxcha1ka_ 27.01.2026
AHDL Разработать программы для синтеза следующих устройств: 1. Параллельного регистра 4-х разрядного с синхронной загрузкой и асинхронным сбросом (обнулением); Пoмoгитe пoжaлyйстa
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru