var
a: array [1..20] of 2..5; //Массив оценок учеников
i: integer;
n: array [2..5] of 2..5; //Массив счетчиков оценок
begin
for i:= 2 to 5 do //Обнуляем счетчики оценок
n[i]:= 0;
for i:= 1 to 20 do //Вводим оценки учеников и считаем их
begin
writeln('Введите оценку ', i, ' ученика');
readln(a[i]);
if a[i] = 2 then n[2]:= n[2] + 1;
if a[i] = 3 then n[3]:= n[3] + 1;
if a[i] = 4 then n[4]:= n[4] + 1;
if a[i] = 5 then n[5]:= n[5] + 1;
end;
for i:= 2 to 5 do
writeln('Количество получивших ', i, ' за диктант равно: ', n[i]); {Выводим значения счетчиков}
end.
var
a: array [1..20] of 2..5; //Массив оценок учеников
i: integer;
n: array [2..5] of 2..5; //Массив счетчиков оценок
begin
for i:= 2 to 5 do //Обнуляем счетчики оценок
n[i]:= 0;
for i:= 1 to 20 do //Вводим оценки учеников и считаем их
begin
writeln('Введите оценку ', i, ' ученика');
readln(a[i]);
if a[i] = 2 then n[2]:= n[2] + 1;
if a[i] = 3 then n[3]:= n[3] + 1;
if a[i] = 4 then n[4]:= n[4] + 1;
if a[i] = 5 then n[5]:= n[5] + 1;
end;
for i:= 2 to 5 do
writeln('Количество получивших ', i, ' за диктант равно: ', n[i]); {Выводим значения счетчиков}
end.
Очень низкие требования к аппаратным средствам — минимально для работы требуется клавиатура и символьное устройство вывода или терминал, соединённый с машиной.
Высокая степень унификации — всё взаимодействие обеспечивается через две функции: ввод и вывод символов, часто реализуемые через файловый ввод-вывод.
Широкая возможность интеграции программ — посредством использования командного интерпретатора и перенаправления ввода-вывода.
Недостатки командного интерфейса
Плохая наглядность интерфейса — необходимо помнить команды или пользоваться справочником.
Ограниченные возможности вывода информации — отсутствие графики