Помогиет решить 1. Напишите программку, вычисляющую площадь прямоугольника. С клавиатуры

Помогиет решить
1. Напишите программу, вычисляющую площадь прямоугольника. С клавиатуры вводятся два реальных числа - стороны прямоугольника. Нужно вычислить его площадь и вывести на экран. Вывод обязан быть отформатирован последующим образом: под число отводится 10 знаков, а под вещественную часть - 3.
2. С клавиатуры вводятся 3 целых числа. Определить количество положительных чисел в этом комплекте.

Задать свой вопрос
1 ответ
1. Var a, b, c:real; d:integer; Begin Readln(a, b) ; S:=a*b; Write(s) ; End. 2. Var a, b, c:real; d:integer; Begin D:=0; Readln(a); If (agt;0) then d:=d+1; Readln(b) ; If (bgt;0) then d:=d+1; Readln(cgt;0) then d:=d+1; Write(d); End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт