Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Распределение ресурсов Нужна программа для курсовой по теме задача распределения ресурсов задачу нужно выбрать любой помогите пжлста может у кого сохранилась Добавлено через 11 минут вот есть код но он ответ не выдает Program RaspredelenieResursov; Uses crt,GraphABC; Type dmyarray=array of Real; omyarray=array of Real; Var Data:dmyarray; https://www.cyberforum.ru/ pascalabc/ thread328046.html	Структуры данных:массивы,строки,записи. Pascal ABC Здравствуйте ув.программисты. Помогите пжл решить задачу Дана строка текста.Выяснить,каких символов в ней больще:*или+.
Pascal ABC Оставить возростающую последовательность в масиве https://www.cyberforum.ru/ pascalabc/ thread328027.html Дан целочисленный линейный массив из 10 элементов. Найдите наименьшее число K элементов, которое нужно исключить из последовательности A, A,…,A, чтобы осталась возрастающая последовательность.	Pascal ABC Напечатать те слова последовательности, в которых первая буква входит в него еще раз https://www.cyberforum.ru/ pascalabc/ thread328013.html Дана последовательность, состоящая из 10 слов. Напечатать те слова последовательности, в которых 1-я буква входит в него еще раз. Помогите решить!
Смоделировать работу калькулятора Pascal ABC написать программу, моделирующую работу калькулятора!	Pascal ABC Длина самого короткого слова в предложении Напишите программу вычисляющую длину самого короткого слова в предложении из нескольких слов, разделённый пробелами. https://www.cyberforum.ru/ pascalabc/ thread328000.html
Pascal ABC Поиск номера телефона по введенной фамилии https://www.cyberforum.ru/ pascalabc/ thread327999.html строки записной книжки содержат фамилии и номера телефонов. Организовывать поиск номера телефона по введеннойй фамилии (в случае отствия такой фамилии вывести соответствующий ответ)	В новом файле заменить латинские буквы на русские Pascal ABC Работа с несколькими типизированными файлами создать файл, состоящий из N латинских букв. Составить программу, которая получает новый файл, переписывая существующий файл. в новом файле заменить латинские буквы на русские. помогите мне, а я не поняла,какк сделать программу
Pascal ABC Найти количество слов в строке https://www.cyberforum.ru/ pascalabc/ thread327995.html Напишите программу, определяющую число слов в строке. Одно слово от другого отделяется одним или несколькими пробелами. Добавлено через 17 минут :wall: в работе со стоками ничего не понимаю=-O	Pascal ABC ожидал индентификатор ((( ошибка почему не работает? program bukvi; var s :string; i,k,j :integer; begin k:=0; j:=0; readln(s); for i:=1 to length(s) do begin https://www.cyberforum.ru/ pascalabc/ thread327988.html
Строка текста Pascal ABC Дана строка текста, заканчивающая точкой. Вывести в алфовитном прорядке все содержащиеся в тексте гласные буквы.	Pascal ABC Получить новый файл, в котором буквы слова будут расположены правильно 1) Имеется типизированный файл, элементами которого являются отдельные буквы, составляющие последовательность кадировко. Получить новый файл, в котором буквы слова кодировка будут расположены правильно. Вот я нафурычила: type fails=record s:string; end; var t,tt:file of fails; st,ts:fails; {êàäèðîâêî ê_äèðîâê_ } begin https://www.cyberforum.ru/ pascalabc/ thread327878.html

Puporev

Почетный модератор

64300 / 47595 / 32743

Регистрация: 18.05.2008

Сообщений: 115,181

30.06.2011, 13:35

арифметические выражения - Pascal ABC - Ответ 1807299

30.06.2011, 13:35. Показов 1695. Ответов 1

Метки (Все метки)

Сообщение было отмечено aleg как решение

Решение

Pascal

uses crt;
var s:string;
    i,sum:integer;
begin
writeln('Введите строку из цифр, разделенных знаками + и минус:');
readln(s);
sum:=ord(s[1])-48;
for i:=3 to length(s) do
if s[i-1]='+' then sum:=sum+(ord(s[i])-48)
else if s[i-1]='-' then sum:=sum-(ord(s[i])-48);
write('Сумма=',sum);
end.

Вернуться к обсуждению:
арифметические выражения Pascal ABC

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

30.06.2011, 13:35

Готовые ответы и решения:

Арифметические выражения любой длины
напишите программу которая вычисляет целочисленные арифметические выражения любой длины не...

Арифметические выражения
https://www.cyberforum.ru/attachment.php?attachmentid=11828&stc=1&d=1255846881 Помогите, нужно...

арифметические выражения, массивы
type Vector = array of real; var x, y : Vector; напишите арифметическое выражение значением...

Запишите арифметические выражения
Запишите арифметические выражения в паскале 13,27 Помогите с паскалем.

	30.06.2011, 13:35

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

30.06.2011, 13:35

Помогаю со студенческими работами здесь

Вычислить арифметические выражения из файла
Дан файл, содержащий текст и арифметические выражения вида а*в, где *-один из знаков +,-,*,/....

Дан текст, в котором встречаются арифметические выражения вида a Å b, где Å - один из знаков +, -, *, /. Выписать все арифметические выражения и вычис
Дан текст, в котором встречаются арифметические выражения вида a Å b, где Å - один из...

Напишите следующие алгебраические выражения как арифметические выражения на языке C#
помогите решить задачу, напишите следующие алгебраические выражения как арифметические выражения...

Дан файл, содержащий текст и арифметические выражения. Выписать и вычислить все выражения
Дан файл, содержащий текст и арифметические выражения вида a®b, где ® — один из знаков +, -, *, /...

Наверх