Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
Владислав Царик
0 / 0 / 0
Регистрация: 13.03.2011
Сообщений: 4
1

Определить количество операций сложения, вычитания и умножения в выражении

05.04.2011, 22:17. Просмотров 1162. Ответов 2
Метки нет (Все метки)

Помогите пожалуйста решить задачу по программированию в ТР7

Определить общее колличество операций сложения (+), вычитания (-) и умножения (*) в заданном арифметичесском выражении.

Зарание благодарен
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.04.2011, 22:17
Ответы с готовыми решениями:

Выполнение операций сложения, вычитания и умножения над матрицами целых чисел
Нужно разработать прогу, которая обеспечивает выполнение операций сложения, вычитания и умножения...

Выполнение операций сложения, вычитания и умножения над матрицами целых чисел
Вобщем нужно разработать проект, который обеспечивает выполнение операций сложения, вычитания и...

Возведение в степень, используя лишь операции сложения, умножения и вычитания
Дано действительное число х. Не пользуясь никакими други*ми арифметическими операциями, кроме...

Придумайте выражение, которое с помощью mod, div, сложения, вычитания и умножения
Придумайте выражение, которое с помощью mod, div, сложения, вычитания и умножения: Переводит число...

Операции сложения, вычитания, умножения и деления в троичной СС
Операции сложения, вычитания, умножения и деления в троичной СС. (тип данных массив, числа...

2
Small Lamer
143 / 143 / 141
Регистрация: 05.04.2011
Сообщений: 270
05.04.2011, 22:25 2
Лучший ответ Сообщение было отмечено Владислав Царик как решение

Решение

Вот прога на скорую руку)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var i:longint;
    a:array[1..3] of longint;
    s:string;
begin
readln(s);
for i:=1 to length(s) do
  begin
    if s[i]='+' then inc(a[1]);
    if s[i]='-' then inc(a[2]);
    if s[i]='*' then inc(a[3]);
  end;
for i:=1 to 3 do write(a[i],' ');
readln;
end.
1
Владислав Царик
0 / 0 / 0
Регистрация: 13.03.2011
Сообщений: 4
05.04.2011, 22:46  [ТС] 3
спасибо большое!! все работает
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.04.2011, 22:46

Придумайте выражение, которое с mod, div, сложения, вычитания и умножения
Придумайте выражение, которое с помощью mod, div, сложения, вычитания и умножения:переводит число...

Определить общее количество операций суммы (+), разницы(-) и умножения(*) в заданом арифметическом примере
Срочно!!! Помогите решить задачки!!! Экзамен!!! 1. Определить общее количество операций суммы...

Написать процедуру для сложения, умножения квадратных матриц N*N, и умножения матрицы на вектор
Написать процедуру для сложения, умножения квадратных матриц N*N, и умножения матрицы на вектор


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru