Помогите пожалуйста с заданием !!

Помогите пожалуйста с заданием !!

Задать свой вопрос
1 ответ
Пожалуйста.
Программка прикреплена.
Вот текстовый вариант:
program slishkomprosto;
var
 shir,vis,dvervis,oknovis,dvershir,oknoshir:real;
begin
 writeln('Введите ширину комнаты');
readln(shir);
writeln('Ширина комнаты= ', shir);
writeln('Введите вышину комнаты');
 readln(vis);
writeln('Вышина комнаты= ', vis);
 writeln('Введите ширину окна');
 readln(oknoshir);
writeln('Введите вышину окна');
readln(oknovis);
writeln('Введите ширину двери');
readln(dvershir);
writeln('Введите вышину двери');
 readln(dvervis);
writeln('Площадь стен для обклеивания обоями=', vis*shir-(dvershir*dvervis)-(oknovis*oknoshir));
End.
Вячеслав Фейн
Не указывает
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт