Предмет: Информатика,
автор: ЕКАТЕРИНА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
Интересные вопросы
Предмет: Математика,
автор: millerkotik
Предмет: Немецкий язык,
автор: Cerega22836
Предмет: Литература,
автор: mira2968p4x5k8
Предмет: Литература,
автор: polinafedyukova
Предмет: География,
автор: spadanil2