Предмет: Информатика,
автор: pomash99
Составить задачу в Pascal ABC
Через 3 месяца работы вы решили сходить в отпуск. Вам должны выплатить отпускные в размере среднемесячной зарплаты. Напишите программу, которая позволит вычислить ваши отпускные.
А=1 зп (11000)
B=2 зп (12000)
С=3 зп (10000)
(A+B+C)/3 средняя
Ответы
Автор ответа:
1
Как то так)
Program p1;
Var a,b,c,d:real;
Begin
a:=11000;
b:=12000;
c:=10000;
d:=(a+b+c)/3;
Writeln('Ваши отпускные: ', d);
End.
Program p1;
Var a,b,c,d:real;
Begin
a:=11000;
b:=12000;
c:=10000;
d:=(a+b+c)/3;
Writeln('Ваши отпускные: ', d);
End.
pomash99:
Ну я как нибудь проверю, спс.
Похожие вопросы
Предмет: Окружающий мир,
автор: annatchubatova
Предмет: Английский язык,
автор: sashastankevic
Предмет: Русский язык,
автор: Ksysoeva20
Предмет: Литература,
автор: Lomagaanna01
Предмет: Литература,
автор: sanya18092006