Помогите составить программку в Паскаль, пожалуйста))) Нужно рассчитать цена материалов

Помогите составить программку в Паскаль, пожалуйста)))
Необходимо высчитать стоимость материалов для ремонта пола комнаты. Стоимость 1 м^2 линолеума - 300 рублей, 1 плинтус, длиной 3 м стоит 60 рублей. Поначалу высчитать площадь и периметр пола комнаты, размеры произвольные)
Безотлагательно!!!

Задать свой вопрос
1 ответ
Program zz;var a,b,s,p,z,y:integer;beginwriteln('Длина пола:');readln(a);writeln('Ширина пола:');readln(b);s:=a*b;writeln('Площадь пола:',s);p:=2*(a+b);writeln('Периметр пола:',p);z:=s*300;writeln('Стоимость линолеума:',z,'рублей');y:=20*p;writeln('Стоимость плинтуса:',y,'рублей');end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт