tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Pascal: периметр прямоугольника
Pascal: периметр прямоугольника p дм. одна из сторон длиной a см. найти площадь прямоугольника
COYOT61
1 19.08.2019 23:30
0
Ответы
azik55
24.04.2020 04:13
Р дм = ? см ? см - А см = ? см
ПОКАЗАТЬ ОТВЕТЫ
MuBuHa
24.04.2020 04:13
Var a,b,p,s:real;
begin;
write('Введите сторону: ');
readln(a);
write('Введите периметр: ');
readln(p);
p:=p*10;
b:=(p/2)-a;
s:=a*b;
write('Вторая сторона равна ', b,', площадь равна ', s)
end.
Если периметр в сантиметрах, убери строку "p:=p*10;"
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lazyseal1488
19.06.2019 10:10
Составить программы : ) 1.введено четырехзначное число. найти сумму цифр, кратных 3-м. 2.определить, сколько среди заданных чисел a, b, c, d отрицательных. 3.составить программу,...
alena0bashinskaya
16.04.2019 23:12
Определить, равен ли квадрат заданного трехзначного числа a кубу суммы двух его последних цифр во фри бейсике....
папа1231
04.03.2021 09:55
Помагите сделать сор по инфарматики ...
Miniplayer
04.03.2021 09:55
Задание 2 Установите последовательность действий работы в Python № ДЕЙСТВИЕFile → New fileRun→ Run module(F5) Python X.X → IDLE (Python X.X 32/64 bit)Набираем код программыСохранить...
11264чс
04.03.2021 09:55
ТЕКСТ ЗАДАНИЯ Установи соответствие арифметических операции и результата выполнения суслик в этом не шарит...
Yaroslav1RUS
04.03.2021 09:55
Help my python 15 ball 9 class...
Мика7477u
04.03.2021 09:55
How To Setup Your Router Via 192168111.Net IP Address? If you are looking forward to setting up your router, then you need to follow some essential steps. • Firstly, you need...
Danielllllllll
04.03.2021 09:56
Определите, что будет напечатано в результате выполнения следующего скрипта: for i in range(6,4,-1):print(i) ...
lidiyamartin9
28.04.2020 14:11
Написать программу на языке Паскаль в PABC и начертить блок-схему 4. Ввести трехзначное число. Если оно четное, разделить его на 4, если нечетное - умножить на 5. Если ввели...
evakazakova20
28.04.2020 14:12
Фрагмент текста это слово предложение непрерывная часть текста абзац...
Популярные вопросы
Почему люди и животные могут ходить,а растения нет? ответьте ,только сереьезно...
3
Вычислите значение выражения 1/2*√0,64...
3
Как называют равные части линейки? 1.деления.2.штрихи,3.шкалы....
3
Сколько элементов массива превышают среднее арифметическое значение максимального...
2
Complete the sentences with the prepositions from the box. some og the...
1
Выделите причины и результаты всех войн россии в 17(семнадцатые) века на...
2
Какая характеристика у алеши из сказки черная курица или подземные жители!...
1
Пож, 40 . dorothy, the girle in the book the marvelous land of oz by l....
1
Составьте с данными ниже глаголами 5-6 распрастраненных предложений на...
2
Впервой дня мама дожна успеть сходить почту, в магазин и в аптечный киоск,...
2
begin;
write('Введите сторону: ');
readln(a);
write('Введите периметр: ');
readln(p);
p:=p*10;
b:=(p/2)-a;
s:=a*b;
write('Вторая сторона равна ', b,', площадь равна ', s)
end.
Если периметр в сантиметрах, убери строку "p:=p*10;"