Итоговая работа №1.9 класс Задание 1. Напишите программу, которая считывает с клавиатуры 3 целых числа (переменные
x, y, z) и выводит на экран формулы с подставленными значениями из переменных и их решение:
1. x+y+z?
2. (x+2) - (3+у?)
3. x-3y+ 2*z– 15
Пример:
Входные данные (ВВОДЯТСЯ ПРИ КЛАВИАТУРЫ):
»x=5
»y=3
>>Z=-4
Выходные данные:
>>50
>>29
>>7
Подсказка:
Для ввода целого числа при клавиатуры используйте команду int(input();
Степень можно найти при символа (пример: 5**2 = 25).
.
.

1) // здесь нужно объявить количество элементов или ввести с readln var  a: array [1..n] of integer; i: integer; min: integer; max: integer; minnum: integer; maxnum: integer; begin // здесь должен быть ввод значений массива в цикле // for i: =1 to n do a[i]=random(100); или через readln; min : = a[1]; minnum : = 1; max : = a[1]; maxnum : = 1; for var i: =2 to n do begin   if a[i]< min then       begin           min : = a[i];           minnum : = i;       end;   if a[i]> max then       begin           max : = a[i];           maxnum : = i;       end; end; a[maxnum]=min; a[minnum]=max; //здесь вывод нового массива end. 2) for i: =1 to n do if a[i]> 0 then   if a[i] mod 2 = 0 then      write(a[i], ' '); 3) var sum: integer; start: integer; for i: =1 to n doif a[i]=0 then    start=i+1;   ////нашли первый нулевой, начинаем дальше со следующегоfor i: =start to n dobeginif a[i]> 0 then    begin      sum=sum+a[i];       write(i, ' '); ///номер положительного элемента    end; writeln; write('сумма =',sum); end;