Есть ответ 👍

Как узнать, является ли поле ключевым​

264
404
Посмотреть ответы 1

Ответы на вопрос:

kiratheone
4,8(70 оценок)

2. var n,s,i: integer; begin writeln ('программа, которая вычисляет сумму нечетных чисел от 11 и до n, задаваемого клавиатуры (n> 11)'); write ('введите n: '); readln (n); for i: =11 to n do if i mod 2 = 1 then s: =s+i; writeln ('сумма нечетных чисел от 11 до ',n,' равна ',s) end. 1. var a,b: real; begin writeln ('программа для решения уравнения 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.

Популярно: Информатика