fkn+antitotal

Задача 1 Урок 20

Создайте файл в вашей операционной системе и выведите в консоль всё его содержимое.

var f:text; s,name:string;
begin
  name:='C:\Users\test\Desktop\TraliVali\file.txt';
  assign(f,name);
  reset(f);
    writeln('========nachalo=====');
  while not eof(f) do
    begin
      readln(f, s);
      writeln(s);
    end;
  writeLn('========= konez =========');
  readln();
end.   

Задача 1 Урок 19

Получите случайный набор из 5 чисел, величиной от 1 до 50.
Рассчитайте для каждого числа два его наибольших делителя, число и два делителя храните как запись, а для всего набора используйте массив записей.
Используйте в коде do with
Выведите на экран результаты расчетов для каждого из исходных значений

Задача 12 Урок 18

Задана последовательность символов, имеющая следующий вид: p1q1p2q2p3...qn–1pn , где pi — число, а qi — знак арифметического действия из набора {+, –, *}. Вычислите значение выражения, предполагая, что действия выполняются согласно правилам арифметики.

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

Примеры:

Задача 11 Урок 18

Задана последовательность символов, имеющая следующий вид: p1q1p2q2p3...qn–1pn , где pi — число, а qi — знак арифметического действия из набора {+, –, *}. Вычислите значение выражения, предполагая, что действия выполняются согласно правилам арифметики.

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

Примеры:

Задача 10 Урок 18

На вход вашей программы подается строка вида:
?
1

5 + 6 -34 + 56 - 7 + 2

("сколько угодно" чисел с операциями суммы и разности в любом порядке). Вычислите результат (пробелов между символом операции и числом может и не быть)

Задача 9 Урок 18

На вход вашей программы подается строка вида:
?
1

например:
?
1

1 + 3

или
?
1

2 - 12

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

Задача 8 Урок 18

Решите предыдущую задачу:

Пользователь вводит в консоль строки вида (имя + произвольное число пробелов + балл):

Вася 485
Коля 555
Юра 61
..........
....
end // признак завершения ввода

Задача 7 Урок 18

Пользователь вводит в консоль строки вида (имя + произвольное число пробелов + балл):

Вася 485
Коля 555
Юра 61
..........
....
end // признак завершения ввода

Задача 6 Урок 18

Пользователь вводит в консоль строку вида:

Имя 123

-- т.е. слева имя и через произвольное количество пробелов число баллов. Разберите эту строку получив имя пользователя как значение в переменной типа string и число баллов в перееменной типа integer;

Задача 5 Урок 18

Пользователь вводит произвольную строку, посчитайте количество чисел в ней - тех, что больше 125.