Вопрос по информатике:
Поммогите пожалуйста задание 4* нужно использовать формулу которая записана справа под заданием
Пожаловаться
- 18.12.2017 22:37
- Информатика
- remove_red_eye 4021
- thumb_up 9
Ответы и объяснения 1
Var x1,x2,y1,y2,a,b,s,p: real;
begin
write('Введите x1: ');
readln(x1);
write('Введите y1: ');
readln(y1);
write('Введите x2: ');
readln(x2);
write('Введите y2: ');
readln(y2);
a:= abs(x2-x1);
b:= abs(y2-y1);
p:=2*(a+b);
s:=a*b;
writeln('Периметр прямоугольника: ', P);
writeln('Площадь прямоугольника: ', S);
end.
begin
write('Введите x1: ');
readln(x1);
write('Введите y1: ');
readln(y1);
write('Введите x2: ');
readln(x2);
write('Введите y2: ');
readln(y2);
a:= abs(x2-x1);
b:= abs(y2-y1);
p:=2*(a+b);
s:=a*b;
writeln('Периметр прямоугольника: ', P);
writeln('Площадь прямоугольника: ', S);
end.
Пожаловаться
- 19.12.2017 01:05
- thumb_up 8
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы