Помогите!
1) Составь программу для решения уравнения ax=b, произвольно вводимых с клавиатуры a и b.
2)Написать программу, которая вычисляет сумму нечетных чисел от 11 и до n задаваемого клавиатуры, но больше 11

Можешь тоже помочь задание в профиле

нет мне очень срочно

пож6

2.var n,s,i:integer;beginwriteln ('Программа, которая вычисляет сумму нечетных чисел от 11 и до n, задаваемого клавиатуры (n>11)');write ('Введите n: ');readln (n);for i:=11 to n doif i mod 2 = 1 then s:=s+i;writeln ('Сумма нечетных чисел от 11 до ',n,' равна ',s)end.1.var a,b:real;beginwriteln ('Программа для решения уравнения ax=b');write ('Введите a и b: ');readln (a,b);if (a=0) and (b=0) then writeln ('x - любое число')else if (a=0) and (b<>0) then writeln ('решений нет')else writeln ('x = ',b/a)end.