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

Question

Информатика

Аскольд

5 год назад

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

ОТВЕТЫ

Bebicav

Jun 29, 2019

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.

86