в паскале задачи решить (программу написать)
1)найти сумму элементов от А до Б
2)вывести все элементы от А до Б при любых значениях А и Б (целых)

Есть ответ
18.12.2022
324

Ответ


Program n1;Uses CRT;Var a,b,s,i: integer;beginwriteln('Vvedite A i B');readln(a,b);If a>b then for i:=b to a do begin writeln(i); s:=s+i; end else if b>a then for i:=a to b do begin writeln(i); s:=s+i; end else writeln('ravny');writeln('Summa = ',s);readlnend.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.