Напишите программу в паскале, плиз.В этой задаче нужно посчитать суммарную площадь

Напишите программу в паскале, плиз.
В этой задачке нужно посчитать суммарную площадь прямоугольников двух видов. Знаменито, что количество всех прямоугольников одинаково удвоенному значению положительной целочисленной ширины прямоугольников первого вида, и прямоугольников обоих видов поровну.
Формат входных данных
В единственной строке записаны четыре целых положительных числа h1,w1,h2,w2 (вышина и ширина для первого и второго видов прямоугольников соответственно). Все числа лежат в диапазоне от 0 до 106 включительно.
Формат результата
Выведите единственное число ответ на задачу.
Образцы
Входные данные 1 2 3 4
Итог работы 28


Задать свой вопрос
1 ответ
Введем обозначение. Все, относящееся к прямоугольникам первого вида будет иметь индекс 1, ворого вида - индекс 2.
Пусть имеется n и n прямоугольников. По условию n+n = w и n=n, откуда n=w и n=w
Площади: S=wh, S=wh
Общая площадь S = nwh + nwh = w(wh + wh)

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программка не работает, обновите её версию!
begin
  var h1,w1,h2,w2:real;
  Read(h1,w1,h2,w2);
  Writeln(w1*(w1*h1+w2*h2))
end.

Пример
1 2 3 4
28
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт