Дорогие друзья! Помогите решить задачу в Paskal Пользователь вводит две стороны трех...

0 голосов
73 просмотров

Дорогие друзья! Помогите решить задачу в Paskal
Пользователь вводит две стороны трех прямоугольников вывести их площадь


Информатика | 73 просмотров
0

Все в школе не учили как считать площадь? Или Вы не проходили таблицу умножения?

0

Нет такого языка - Paskal. Есть Pascal, причем у него много различных версий, которые несколько разнятся.

Дан 1 ответ
0 голосов

// PascalABC.Net
procedure RectangleSquare;
var
  a,b:double;
begin
  Write('Введите через пробел длины сторон прямоугольника: '); Read(a,b);
  Writeln('Площадь прямоугоьника равна ',a*b)
end;

var
  i:byte;
begin
  for i:=1 to 3 do RectangleSquare
end.

Тестовое решение:
Введите через пробел длины сторон прямоугольника: 3 7
Площадь прямоугоьника равна 21
Введите через пробел длины сторон прямоугольника: 12.4 15.8
Площадь прямоугоьника равна 195.92
Введите через пробел длины сторон прямоугольника: 14 12.5
Площадь прямоугоьника равна 175

(142k баллов)