=
Объяснение:
const
nmax=100;
type
Tarr=array[1..nmax] of integer;
var
a:Tarr;
i,n:integer;
begin
randomize;
repeat
write('Razmer massiva, ne bolee ',nmax,': ');
readln(n);
until n in [1..nmax];
writeln('Ishodniy massiv:');
for i:=1 to n do
begin
a[i]:=random(50);
write(a[i]:4);
end;
writeln;
i:=1;
while (i<=n) and (a[i] mod 5<>0) do
inc(i);
if i>n then
writeln('Net elementov kratyh 5')
else
begin
a[i]:=0;
writeln('Poluchenniy massiv:');
for i:=1 to n do
write(a[i]:4);
writeln;
end;
end.
1) Наглядное представление информации.
2) Простота в использовании: в консоли вы не можете посмотреть содержимое папки, если не знаете, какой командой это делается.
3) Быстрое переключение между задачами и многозадачность (попробуйте одновременно выполнить несколько программ в одной консоли. Если я не ошибаюсь, это возможно только в Unix-подобных системах.)
1) Избыточное количество действий: нередко для выполнения тривиальных задач нужно нажать больше кнопок, чем в консоли. Например, su kwrite выполняется гораздо быстрее, чем Пуск - Все программы - Стандартные - Блокнот.
2) Сложности в настройке: нередко трудно выбрать подходящие размеры шрифта, а неправильный выбор может быть вреднее для глаз или причинять неудобства.