ПАСКАЛЬ ABC!!!Ввести массив на 15 чисел. Сумму 5 и 7 частей

ПАСКАЛЬ ABC!!!
Ввести массив на 15 чисел. Сумму 5 и 7 частей массива принять за длину прямоугольника. Сумму 8 и заключительного частей принять за ширину прямоугольника. Вычислить периметр и площадь прямоугольника, вывести их на экран.

Задать свой вопрос
1 ответ
Var
  a : array[1..15] of integer;
  i, l, d : integer;
begin
  for i := 1 to 15 do
    begin
      writeln(i ,' число');
      read(a[i]);
    end;
  l := a[5] + a[7];
  d := a[8] + a[15];
  writeln('Периметр: ',(l + d) * 2, ' Площадь: ', l *d );
end;
Nikitka Bazjaev
площадь равзе так находится?
Макс Шуганов
разве*
Darina
you failed, спутал с прямоугольным треугольником :3
Ксения Чмиль
Площад прямоугольника - ширина на вышину, что не так? Если желаешь иное подсчитать, то измени заключительную формулу и всё
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт