Напишите процедуру, которая вычисляла бы периметр и площадь квадрата

@Кан95 · Регистрация: 08.04.2019

Author24 — интернет-сервис помощи студентам

Помощь нужна мужики! "Напишите процедуру, аналогичную процедуре Pr, которая вычисляла бы периметр и площадь квадрата со стороной r и а также объем куба с тем же самым ребром r." В паскале нужно мужики

@ZX Spectrum-128 · 18.04.2019, 09:38

4.Запрещено создавать темы с бессмысленными названиями вроде "Помогите!", "Вопрос" и т.п.

https://www.cyberforum.ru/announcement.php?a=3

Комментарий модератора

Кан95, вы нарушаете Правила! Предупреждение!

Добавлено через 1 минуту
Вычислить периметр квадрата
Составить программу расчёта объёма куба и площадии его боковой поверхности

@Cyborg Drone · 20.04.2019, 20:21

Сообщение от Кан95

Помощь нужна мужики

А от баб помощь не принимаете? А то как-то так получилось, что на этом форуме и мужики есть, и бабы.

Сообщение от Кан95

Напишите процедуру, аналогичную процедуре Pr

А где процедура Pr, аналогично которой нужно написать?

@Кан95 · 24.04.2019, 11:41 **[ТС]**

Pascal

Program ProcUse
Uses CRT;
Procedure Pr (R,L,S:real);
begin
L:=2*PI*R;
S:=PI*sqr (R);
end;
var rad,len, area:real;
begin
write ('  ');readln (rad);
Pr (rad,len,area);
writeln ('   'l, len);
writeln ('   '),area):
end.

Аналогично этой нужно сделать

@Cyborg Drone · 25.04.2019, 07:41

Вы привели нерабочую программу. Она содержит ошибки: четыре синтаксических и одну алгоритмическую. Будьте внимательнее. Также в программе отсутствует какой-либо интерфейс. Код не отформатирован.

Рабочая программа, наподобие Вашего неудачного примера, и в его же стиле:

Pascal

Program ProcUse;
Uses CRT;
Procedure Pr (R:real;var P,S,V:real);
begin
P:=4*R;
S:=R*R;
V:=R*R*R;
end;
var r,per,area,vol:real;
begin
write ('  ');readln (r);
Pr (r,per,area,vol);
writeln ('   ', per);
writeln ('   ',area);
writeln ('   ', vol);
end.

То же самое, но оформленное по-человечески, и с простейшим интерфейсом:

Pascal

Procedure Pr(R: real; var P, S, V: real);
begin
  P := 4 * R;
  S := R * R;
  V := R * S
end;
 
var
  r, per, area, vol: real;
 
begin
  write('R = ');
  readln(r);
  Pr(r, per, area, vol);
  writeln('P = ', per);
  writeln('S = ', area);
  writeln('V = ', vol)
end.

@Кан95 · 25.04.2019, 12:10 **[ТС]**

Спасибо большое

Новые блоги и статьи
Из чего и как собрать свой домашний кинотеатр bt_guru 21.01.2025 Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .	Ошибки стиральных машин bt_guru 21.01.2025 Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .	Копирование (маппинг) объектов в JavaScript bytestream 21.01.2025 В современной разработке программного обеспечения копирование объектов представляет собой фундаментальную операцию, которая требует особого внимания и понимания. Маппинг объектов в JavaScript – это. . .	Как работать с Apache Kafka в C# .NET bytestream 21.01.2025 Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки больших объемов информации в реальном времени. Эта система,. . .	Как использовать RabbitMQ в C# .NET bytestream 21.01.2025 RabbitMQ представляет собой мощный брокер сообщений, который эффективно решает эту задачу, обеспечивая надежную передачу данных между множеством приложений. Этот инструмент реализует протокол AMQP. . .	Как объединить последние коммиты в Git bytestream 21.01.2025 В мире разработки программного обеспечения система контроля версий Git стала незаменимым инструментом для управления исходным кодом. Одной из наиболее полезных, но порой сложных для освоения функций. . .
Как запушить новую локальную ветку (branch) в удалённый репозиторий Git и отслеживать её bytestream 21.01.2025 В современной разработке программного обеспечения система контроля версий Git стала неотъемлемым инструментом для эффективного управления кодом и организации командной работы. Одной из ключевых. . .	Как создать директорию и все родительские директории, указанные в пути, с помощью Python bytestream 21.01.2025 Python предоставляет мощные инструменты для работы с файловой системой через встроенные модули os и pathlib, которые значительно упрощают процесс манипуляции директориями. Эти модули содержат. . .	Как работать с массивами в JavaScript bytestream 21.01.2025 Массивы в JavaScript представляют собой один из фундаментальных типов данных, который позволяет хранить упорядоченные коллекции различных элементов в одной переменной. Эта структура данных является. . .	Какая максимальная длина адреса (URL) в различных браузерах и стандартах bytestream 21.01.2025 В современном мире интернет-технологий URL-адреса (Uniform Resource Locator) играют фундаментальную роль в функционировании веб-пространства. Эти уникальные идентификаторы ресурсов стали неотъемлемой. . .	Как сбросить локальный репозиторий до состояния удалённого репозитория Git bytestream 21.01.2025 При разработке программного обеспечения с использованием системы контроля версий Git разработчики часто сталкиваются с необходимостью синхронизации локального и удаленного репозиториев. Данная задача. . .	Как запретить подсветку выделенного текста с помощью CSS bytestream 20.01.2025 Подсветка текста при выделении является стандартным поведением браузера, которое не всегда соответствует дизайнерским решениям или функциональным требованиям веб-приложения. Выделение текста может. . .

@Кан95 0 / 0 / 0 Регистрация: 08.04.2019 Сообщений: 64
		1
	Напишите процедуру, которая вычисляла бы периметр и площадь квадрата 18.04.2019, 09:35. Показов 5720. Ответов 5 Метки нет (Все метки) Помощь нужна мужики! "Напишите процедуру, аналогичную процедуре Pr, которая вычисляла бы периметр и площадь квадрата со стороной r и а также объем куба с тем же самым ребром r." В паскале нужно мужики 0

@Cyborg Drone Модератор 10076 / 5417 / 3356 Регистрация: 17.08.2012 Сообщений: 16,578
	20.04.2019, 20:21	3
	Сообщение от Кан95 Помощь нужна мужики А от баб помощь не принимаете? А то как-то так получилось, что на этом форуме и мужики есть, и бабы. Сообщение от Кан95 Напишите процедуру, аналогичную процедуре Pr А где процедура Pr, аналогично которой нужно написать? 0

@Кан95 0 / 0 / 0 Регистрация: 08.04.2019 Сообщений: 64
	25.04.2019, 12:10 [ТС]	6
	Спасибо большое 0

Опции темы

Напишите процедуру, которая вычисляла бы периметр и площадь квадрата

Решение