Регистрация
Ангелинка2007
06.06.2022 10:10
Информатика
Есть ответ 👍

Паскаль, создание списка.
Подскажите, как сделать функцию сортировки учеников по алфавиту, добавление нового ученика в середине программы и как удалять учеников? Желательно более введите кол-во учеников: ');
readln(n);
for i:= 1 to n do
begin
write('введите ФИО:');
readln(k[i]);
end;
end;

procedure out;
var i:integer;
begin
writeln('Список класса:');
for i:= 1 to n do
writeln(k[i]);
end;

procedure menu;
begin
writeln('1, Создание списка класса');
writeln('2, Вывод списка класса');
writeln('6, EXIT');
end;

var
kom: byte;
begin
repeat
menu;
readln(kom);
case kom of
1: creat;
2: out;
//3: sort;
// 4: dobavit;
// 5:delet;
6: exit;
end;
until kom = 6;
end.

189
317
Посмотреть ответы 1

Ответы на вопрос:

anastas25a
anastas25a
4,6(79 оценок)
1. а)105(дес.)=1101001(дв.)  151(восьм.)  69(шестн.) б) 358(дес.)=101100110(дв.)  546 (восьм.)  166(шестн.)2.а)777(дес.)     б)805(дес.)     в)74(дес.)     г) 820(дес.)3.а)  1001001011(дв.) 587(дес.)    б)2424(восьм.)  1 300(дес.)    в)4a4(шестн.)  1 188(дес.)4.а)10001111110000(дв.)    9200(дес.) б)46263(восьм.)  19 635(дес.)в)37548(шестн.)226 632(дес.)

Популярно: Информатика