С Новым годом! Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 28.02.2015
Сообщений: 31
1

Исправить код по нахождению суммы

08.04.2015, 16:56. Показов 418. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
не выдает sum. где моя ошибка ?


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
uses crt;
procedure www(a,b:integer);
begin
  write('Vvedite a i b: ');
  readln(a,b);
end;
//--------------------------------------------------
procedure eee(ch:char);
begin
  write('Vvedite operator(+,-,*,/) :');
  readln(ch);
end;
 
//---------------------------------------------------
procedure rrr(x1,x2:integer; var sum:real);
begin
  sum:=x1+x2;
  sum:=x1-x2;
  sum:=x1*x2;
  sum:=x1/x2;
  write(sum);
end;
//----------------------------------------------------
var
z,x:integer;
q:char;
w:real;
begin
  www(z,x);
  eee(q);
  rrr(z,x,w);
 
end.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.04.2015, 16:56
Ответы с готовыми решениями:

Исправить код по нахождению слов-палиндромов
Помогите исправить ошибки в задаче про проверку является ли слово оборотнем. Например maam - слово...

Вычисление суммы выражения - исправить код
Вариант 11. Не могу понять, как правильно задать всё это, чтобы вычитало, постоянно ошибки какие-то...

Исправить код цикла нахождения суммы ряда
Решайте задачу s = 1+cos^2(x) - cos^4 (x) + cos^6 (x) - ... cos^30 (x) У меня задача вот такая....

Исправить код чтобы он считал произведение вместо суммы
Доброго времени суток! Есть код, который считает суму положительных элементов массива. Нужно,...

3
Почетный модератор
64303 / 47600 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
08.04.2015, 17:44 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
uses crt;
procedure www(var a,b:real);
begin
  write('Vvedite a i b: ');
  readln(a,b);
end;
//--------------------------------------------------
procedure eee(var ch:char);
begin
  write('Vvedite operator(+,-,*,/) :');
  readln(ch);
end;
 
//---------------------------------------------------
procedure rrr(x1,x2:real;ch:char; var sum:real);
begin
case ch of
'+':sum:=x1+x2;
'-':sum:=x1-x2;
'*':sum:=x1*x2;
'/':sum:=x1/x2;
end;
write(sum:0:2);
end;
//----------------------------------------------------
var
z,x,w:real;
q:char;
begin
www(z,x);
eee(q);
rrr(z,x,q,w);
end.
Не забывайте перед параметром, который передается в программу ставить var
0
0 / 0 / 0
Регистрация: 28.02.2015
Сообщений: 31
08.04.2015, 17:58  [ТС] 3
на 23 строке что значит
write(sum:0:2);
0
Почетный модератор
64303 / 47600 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
08.04.2015, 18:05 4
форматированный вывод вещественного числа с 2 знаками после точки.
0
08.04.2015, 18:05
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
08.04.2015, 18:05
Помогаю со студенческими работами здесь

Создание пользовательской функции по нахождению суммы за квартал
Уважаемые господа, уже как месяц активно практикуюсь в написании кода в VB (в формах). Более или...

Разработать алгоритм и составить программу по нахождению суммы ряда
Разработать алгоритм и составить программу по нахождению суммы ряда обшей член которого вычисляется...

Решить задачу по нахождению в матрице суммы элементов кратных 5
Помогите, пожалуйста! Необходимо решить задачу по нахождению в матрице суммы элементов кратных 5,...

Разработать алгоритм и составить программу по нахождению суммы ряда
Разработать алгоритм и составить программу по нахождению суммы ряда обшей член которого вычисляется...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Книги и учебные ресурсы по C#
InfoMaster 08.01.2025
Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .
Что такое NullReferenceEx­­­ception и как исправить?
InfoMaster 08.01.2025
NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
Использование GraphQL в Go (Golang)
InfoMaster 08.01.2025
Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор?
Alexander-7 08.01.2025
Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .
Как работать с GraphQL на TypeScript
InfoMaster 08.01.2025
Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .
Счётчик на базе сумматоров + регистров и генератора сигналов согласования.
Hrethgir 07.01.2025
Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru