Question

9. Известны количество жителей в государстве и площадь его территории. Определить плотность населения в этом государстве.
10. **Хозяин хочет оклеить обоями длинную стену в своем доме. Длина этой стены равна А метров, а высота - В метров. Рулон обоев имеет длину 12 метров и ширину K см. Составьте алгоритм и программу, которая определит стоимость обоев для всей стены, если цена одного рулона N руб.
РЕШИТЬ В ПАСКАЛЬ(ПОМОГИТЕ ПОЖАЛУЙСТА)

Answer 1

Ответ:

9)var p:real;

s,n:integer;

begin

writeln('Введите количество жителей государства(в чел)');

readln(n);

writeln('Введите площадь государства(в км^2)');

readln(s);

p:=n/s;

writeln('Плотность государства равняется ',p:0:0,' чел/км^2');

end.

10)var

a,b,k,c:real;

begin writeln ('Введите длину стены');

readln (a);

writeln ('Введите высоту стены');

readln (b);

writeln ('Введите ширину рулона обоев');

readln (k);

writeln ('Введите цену одного рулона');

readln (n);

writeln ('Ответ ',(Round((a*b)/(12*k)))*n);

end.