1)написать на языке паскаль программу ввода четырёх целых чисел и вычисления их среднего арифметического. 2)вводятся величины x,y целого типа. написать программу для обмена значений величин. необходимо использовать величину т. протестировать программу для x=5 и y=-11. 3)написать программу для вычисления дискриминанта d квадратного уравнения ax2 + bx + c = 0. 4)дан размер файла в байтах. используя операцию деления нацело, найти количество полных килобайтов, которые занимает данный файл (1 килобайт = 1024 байта). 5)дано двузначное число. найти сумму и произведение его цифр. , . ничего не понимаю по этому паскалю
Program arifm;Var a, b, c, d, ar:real;beginwriteln('Введите первое число');readln(a);writeln('Введите второе число');readln(b);writeln('Введите третье число');readln(c);writeln('Введите четвертое число');readln(d);ar:=(a+b+c+d)/4;writeln('ответ:',ar);end.