1. Информатика
  2. Составить программу в pascal

Составить программу в pascal для : прямоугольный участок земли имеет периметр р метров. известно, что длина на 20м больше ширины. найдите площадь участка. выберу лучший

АниАпельсинка АниАпельсинка    3   18.06.2019 11:10    1

Ответы
Krutoyabrikos Krutoyabrikos  15.07.2020 06:23
Var P,L,W,S:Real;
Begin
 Read(P);
 W:=P/2;
 L:=P+20;
 S:=L*W;
 Writeln('S = ',S:0:0);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
KasiaW KasiaW  01.07.2019 09:10
Уменьшение положительного числа до тех пор, пока оно неотрицательное. как только число становится отрицательным, команда повторения заканчивает свою работу программу в...
Nikalime156 Nikalime156  01.07.2019 09:10
Дана целочисленная прямоугольная таблица размером m*n. заменить все строки таблицы на строку с максимальным произведением элементов. паскаль....
Vika7791532 Vika7791532  01.07.2019 09:10
Для обмена значений двух переменных был создан некоторый алгоритм. да вот беда, последняя из трех команд была удалена, остались только две из них: 1. а: =a+b 2. b: =a-b...
Mosi23 Mosi23  01.07.2019 09:10
Склавиатуры вводится произвольная строка, состоящая из символов латинского алфавита. группы символов, раздельные пробелами, и не имеющие пробелов внутри будем называть...
valeryahasko070 valeryahasko070  01.07.2019 09:10
А. создать файл, содержащий сведения об отправлении поездов дальнего следования с казанского вокзала. структура записи: № поезда, станция назначения, время отправки, время...
Kakashka2001 Kakashka2001  06.02.2021 18:49
Нужно сделать задание в Pascal ABC.!...
valetto valetto  06.02.2021 18:54
Написать программы решения задач 1. Вычислить у-х?, еесли х 0Х+2sinx, если Kх 201/x, если х2 202. Введено трехзначное число. Если сумма его цифр нечетна,то увеличить число...
MyrkaPC325 MyrkaPC325  06.02.2021 18:54
дана строка текста,где слова разделенны одним пробелом. первый символ каждого слова добавить в конец слова​...
QueenNics QueenNics  06.02.2021 18:57
решить тест по информатике за 8 класс Этот тест вопрос жизни и смерти...
Анюточка2906 Анюточка2906  11.05.2020 22:52
Задание #15 Во В каком из условных операторов допущена ошибка? Выберите один из 4 вариантов ответа: 1) if b=0 then writeln ( Деление невозможно. ) ; 2) if a 3) if a b...

Популярные вопросы