Задана последовательность символов, имеющая следующий вид: p1q1p2q2p3...qn–1pn , где pi — цифра, а qi — знак арифметического действия из набора {+, –, *}. Вычислите значение выражения, предполагая, что действия выполняются согласно правилам арифметики.
Входные данные: На вход программе подается строка указанного вида, состоящая не более чем из 9 чисел, разделенных символами арифметических операций.
Выходные данные: Выведите значение арифметического выражения.
Примеры:
Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).
var a: integer;
procedure f1(var p: integer);
begin
readln(p);
end;
begin
f1(a);
writeln(a);
readln();
end.
Напишите функцию, которая возвращает сумму трёх целых чисел.
var m,n,k:integer;
function f2(a,b,c: integer): integer;
var r: integer;
begin
r:=(a+b+c);
result:=r;
end;
begin
readln(m,n,k);
k:=f2(m,n,k);
writeln(k);
readln();
end.
Имеется текстовый файл в котором содержится не более 30 строк,
в каждой строке не более 30 символов (пробелы тоже считаются символами).
Цифры и другие символы перемешаны в каждой строке.
Задание: найдите максимальное число, c учетом того,
что числом считаются подряд идущие цифры не только по горизонтали,
но и по вертикали.
У вас есть текстовый файл с информацией об итогах соревнований (каждая строка
имеет формат: имя + произвольное число пробелов + балл 1 + произвольное число пробелов + балл 2):
Вася 16 485
Коля 17 555
Юра 18 61
..........
-- где:
слева указаны имена участников, а справа число баллов.
Первое число в каждой строке -- штрафные баллы набранные участниками,
а второе число -- "положительные баллы", то есть если у нас есть строка: