Войти Регистрация Спроси ai-bota

Сосьавить программу назождения среднего арефметического двух чисел

Ответ:

prizrak6571

03.10.2020 05:30

Var
a,b:integer;
r:real;
begin
readln(a);
readln(b);
r:=(a+b)/2;
writeln(r);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Иван199928

10.12.2021 16:43

с заданиями по информатике 8 класс. Паскаль. Очень нужно...

Никольнейв

19.11.2020 07:19

ДЛЯ ПИТОНА ОБЪЯСНИТЕ МНЕ КАК ЭТО ДЕЛАТЬ Я СУТЬ ЗАДАЧИ НЕ ПОНИМАЮ Определите сумму всех элементов последовательности, завершающейся числом 0. Входные данные Вводится последовательность...

Sunlight11

27.07.2022 05:37

Имеется некоторый набор функций для работы со строками символов: символ(s) – функция возвращает первый символ непустой строки s; остаток(s) – функция возвращает строку, полученную...

zheniaKk1

12.01.2023 11:56

Написать программу которая вычисляет сумму первых n членов ряда 1,3,5.. (while,repeat,for ) на паскале...

Leerikaa

12.01.2023 11:56

Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (а, b) (где а, b — целые числа),...

HikariRayto

12.01.2023 11:56

Много ! в паскале : 1) дан одномерный массив, случайным образом числа (10-90) записываются в массив. надо вывести на экран самое малое число и сумму всех чисел 2) при двумерного...

witin2394j

12.01.2023 11:56

Написать программы в паскаль 1. определить, если ли в тексте восклицательный знак. если есть, вывести также порядковый номер первого восклицательного знака. 2. удалить все...

xxx170

12.01.2023 11:56

Составить программы на python! тема: массивы 1) ввести массив из 10 элементов, найти произведение элементов массива. 2)дан массив из n элементов. найти наибольший элемент...

GOrzen32

12.01.2023 11:56

Сколько секунд понадобиться для передачи информации объемом 5 мбайт если скорость передачи 640кбайт/мин...

asiemghulkarimozb3er

04.04.2020 18:34

Язык - pascal 1)есть ли в нем функция котангенса, или надо выражать самому, как 1/tan? 2) можно ли эту строчку кода как-то ? if (d 1) and (d 2) and (d 3) and (d 4) and (d...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку