Предмет: Информатика,
автор: mrgay702
Времени суток!
Слезно прошу помочь с информатикой. Сегодня. Задача на ветвление.
В больнице ведут прием 2 врача. Приемы платные. Подсчитать среднюю стоимость за прием у 1 и 2 врача.
Аноним:
Условие неполное
Ответы
Автор ответа:
0
var a,b: integer;
c: real;
begin
writeln('Введите сумму денег приёма 2-ух врачей');
readln(a,b);
c:=(a+b)/2;
writeln(c);
end.
c: real;
begin
writeln('Введите сумму денег приёма 2-ух врачей');
readln(a,b);
c:=(a+b)/2;
writeln(c);
end.
Похожие вопросы
Предмет: Алгебра,
автор: yameyameyame
Предмет: Математика,
автор: inzurysbaj
Предмет: Литература,
автор: Аноним
Предмет: Математика,
автор: 12345poli
Предмет: Химия,
автор: Kokokomokoko