Чи може система знайти та виправити всі помилки, допущені при введенні тексту?

*.Что общего у пиктограммы и символа? В чем между ними различия?
Общее - оба являются небольшими графическими объектами
Различия - пиктограмма или иконка используется как растровый графический объект и страдает от маштабирования, но при этом может иметь много цветов. Обычно используется как подсказка на кнопку с некой командой (напр. сохранить, копировать, вставить)
Символ является частью некого шрифта и потому нарисован в векторной графике, не искажается при маштабировании, но может быть лишь одного цвета. Может иметь несколько вариантов начертания - курсив, жирный и тд. Используется так же как текст
В последнее время микрософт ввели новый шрифт для пиктограм, окончательно сроднив оба элемента.  

Предложите свою систему пиктограмм для основных рекомендаций по работе за компьютером, направленных на сохранение здоровья пользователя.

Возможно изображение глаз - надо глазам передохнуть, спины и стула - правильная посадка, изображение ходьбы - надо размяться. Что-то типа того

1)var
n:longint;
begin
readln(n);
if n mod 5=0 then writeln('Число N является кратным чилслу 5')else
writeln('Чило N не является кратным числу 5' );
end.
2)
var
a,b,c:longint:
begin
readln(a,b,c);
if (a+b)div 2=c then writeln('Число C является средним арефметическим чисел A и B') else writeln(' Число C является средним арефметическим чисел A и B') else writeln('Число C не является средним арефметическим чисел A и B ');
end.
3)
var
a:longint;
begin
write('Сколько вам лет?');
readln(a);
if a<14 then write('Вам еще рано получать паспорт?') else write('Поздравляю! Вы гражданин России!');
end.
4)
var
a:extended;
begin
readln(a);
if (a>36)and(a<37) then writeln('Вы здоровы') else writeln('Вы больны');
end.