М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ZheniaBabich
ZheniaBabich
04.10.2021 09:29 •  Информатика

36
4.Определите тип
алгоритма для
указанных команд
Команда:
ЕСЛИ◇ТО
сказать "Привет!"
Повторять всегда​

👇
Открыть все ответы
Ответ:
yuliyasecheva
yuliyasecheva
04.10.2021

// PascalABC.NET

begin

 var СправочникКомпании := new List<string>;

 while True do

 begin  

   var НаборСлов := ReadlnString.ToWords;

   var ЧислоСлов := НаборСлов.Length;

   case ЧислоСлов of

     2: СправочникКомпании.Add(НаборСлов[0] + ' ' +

         НаборСлов[1]);

     3: begin

           СправочникКомпании.Add(НаборСлов[1] + ' ' +

               НаборСлов[2]);

           break

        end;  

     else

       Writeln('Нарушен формат данных, строка не принята')  

   end

 end;  

 WriteAllLines('ТелефонныйСправочник.txt',

     СправочникКомпании.ToArray)

end.


Создать структуру данных типа список из сотрудников компании (Фамилия, телефон). Количество сотрудни
4,5(78 оценок)
Ответ:
0Ева002
0Ева002
04.10.2021

1. – выбрать меню «File \ Change dir…» (Файл \ Сменить директорию) и указать диск и каталог, в который следует сохранить текст программы;

– выбрать меню «File \ Save as…» (Файл \ Сохранить как) и ввести имя файла в полеSave file as(по умолчанию Turbo Pascal устанавливает имя NONAMExx.PAS; необходимо указать другое наименование файла, используя при этом англоязычные символы);

3. Запустить программу и посмотреть, нет ли ошибок при компиляции

4. Компиляция - трансляция программы, составленной на исходном языке высокого уровня, в эквивалентную программу на низкоуровневом языке, близком машинному коду

5.Ctrl + F9

6. Write

   Writeln

7. Read

   Readln

4,8(97 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ