fkn+antitotal

Задача 1 урок 12.1

Выведите на экран, все числа от 55 до 9236.

var a,b: integer;
begin
a:=55;
b:=9236;
repeat
    write(a,' ');
    a:=a+1;
until (a>b)
end.

Задача 16 урок 11

У вас есть число z=5. Пользователь вводит числа в цикле, если за последние 4 попытки ввода было хотя бы одно число больше или равно 15, то увеличивайте число z на 1 в ответ на каждое введенное число, а если такого числа не было, то уменьшайте на 1 в ответ на каждый ввод.
Цикл и программа должны завершиться, когда число z станет отрицательным.

Задача 15 Урок 11:

Задача 15 урок 11

Задача 10 урок 11

Пользователь вводит целые числа в цикле (разные: четные, нечетные, положительные, отрицательные в любом порядке и количестве). Сохраните в переменные первые три отрицательных нечетных числа, сложите их, выведите сумму на экран и завершите цикл.

Задача 9 урок 11

Пользователь вводит последовательно три произвольных целых числа. Заведите три переменных и сохраните эти числа в эти переменные. Пользовательский ввод обрабатывайте в цикле.
Примечание: в одном витке цикла должен быть только 1 readln()

var a,b,c,i,j: integer;
begin
i:=1;
for i:=1 to 3 do
begin
readln(j);
    if (i=1) then
        a:=j
    else if (i=2) then
        b:=j
    else
        c:=j;
end;
write(a,' ',b,' ',c);
end.

Задача 14 Урок 11:

У вас есть число z=5. Пользователь вводит числа в цикле, если очередное введенное число больше или равно 15, то увеличивайте число z на 1 в ответ на каждое введенное число, а если меньше 15, то уменьшайте на 1. Цикл и программа должны завершиться, когда число z станет отрицательным.

Урок 18

На вход вашей программы подается строка вида:
5 + 6 -34 + 56 - 7 + 2
("сколько угодно" чисел с операциями суммы и разности
в любом порядке). Вычислите результат (пробелов между
символом операции и числом может и не быть)

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

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


например:

1 +  3  или  2 - 12

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

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