1)Написать на языке Паскаль программу ввода четырёх целых чисел и вычисления их среднего арифметического. 2)Вводятся величины X,Y целого типа. Написать программу для обмена значений величин. Необходимо использовать вспомогател...

1)Написать на языке Паскаль программу ввода четырёх целых чисел и вычисления их среднего арифметического. 2)Вводятся величины X,Y целого типа. Написать программу для обмена значений величин. Необходимо использовать вспомогательную величину Т. Протестировать программу для X=5 и Y=-11. 3)Написать программу для вычисления дискриминанта d квадратного уравнения ax2 + bx + c = 0. 4)Дан размер файла в байтах. Используя операцию деления нацело, найти количество полных килобайтов, которые занимает данный файл (1 килобайт = 1024 байта). 5)Дано двузначное число. Найти сумму и произведение его цифр. Помогите, пожалуйста. Ничего не понимаю по этому паскалю
Гость
Ответ(ы) на вопрос:
Гость
1) Сейчас сделаю остальное. 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.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы