Название программы : текстовый редактор . назначение программы : (вставте вместо трое точия назначения программы название программы : назначение программы : создавать и обрабатывать графические объекты. название программы : музыкальный редактор . назначение программы : вместо трое точия вставте нужные слова

1.  текстовый редактор — создавать и редактировать текстовые файлы2. графический редактор — с оздавать и обрабатывать графические объекты3.  музыкальный редактор — редактировать музыку

Zadacha_1; var a,b,c: integer;   begin    writeln  (' введите число');     readln(a);     b: =a mod 10;     a: =a div 10;     c: =a mod 10;     a: =a div 10;     if (a = b) or (a=c) or (b = c)then writeln  ('такие числа есть')     else writeln('таких чисел нет');     end. zadacha_2; var a: integer;   begin    writeln(' введите время в минутах');     readln(a);     a: =a mod 10;     if ((a > = 0) and   (a < = 3)) or ((a > 5) and   (a < = 8))   then writeln('зелёный');         if ((a > 3) and   (a < = 5)) or ((a > 8) and   (a < 0))   then writeln('жёлтый'); end.

Program project1; var  s: real;   i,j,f: byte;     begin  writeln('vvedite ocenku za fiziku '); readln(i);     writeln('vvedite ocenku za matemat '); readln(j);   writeln('vvedite ocenku za inform '); readln(f);     writeln('vvedite prohodnoi ball'); readln(s);     if s< (i+f+j)then  writeln('student podhodit')    else    writeln('student ne podhodit');     readln; end. надеюсь так? просто не   корректное.