//Среда Паскаль Uses crt; var a, b, c, d, e: integer; begin writeln ('Введите числа'); readln(a,b,c,d,e); if (a mod 2)=0 then writeln ('Ошибка ввода') else if (b mod 2)=0 then writeln ('Ошибка ввода') else If (c mod 2)=0 then writeln ('Ошибка ввода ') else If (d mod 2)=0 then writeln (' Ошибка ввода ') else If (e mod 2)=0 then writeln (' Ошибка ввода ') else Writeln ((a+b+c+d+e) /5); End.
var a,b:=integer begin writeln('Введите число а'); read(a); writeln('Введите число b'); read(b); end. Получается, что writeln Выводит на экран, что ты ввёл/ввела в скобках.