Предмет: Информатика,
автор: ЕКАТЕРИНА00001
Ребят, задача 7 класс, помогите пожалуйста!
Длина клумбы А м, ширина - В м. Чтобы побелить 1 метр бордюра нужно К граммов извести. Сколько извести нужно, чтобы побелить весь бордюр вокруг клумбы?
нужно написать программу на языке Free Pascal
Ответы
Автор ответа:
0
var a,b,k,m:integer;
begin
write('A, B, K: ');
readln(a,b,k);
m:=2*(a+b)*k;
writeln('m = ',m);
end.
Пример:
A, B, K: 3 4 200
m = 2800
begin
write('A, B, K: ');
readln(a,b,k);
m:=2*(a+b)*k;
writeln('m = ',m);
end.
Пример:
A, B, K: 3 4 200
m = 2800
Похожие вопросы
Предмет: Физика,
автор: dianazgerya53
Предмет: Қазақ тiлi,
автор: mzhuldizay
Предмет: Русский язык,
автор: dauletovva05
Предмет: Математика,
автор: Aksiniya200