Составьте программу вычисления суммы всех двузначных чисел. для паскаля.

225

272

Посмотреть ответы 2

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

JasoonVORheeZ

Информатика

4,5(90 оценок)

Program sum; var i, k: integer; begin k: =0; for i: =10 to 99 do k: =k+i; writeln('summa=',k); end.

sangria

Информатика

4,6(82 оценок)

// pascalabc.net 3.3, сборка 1576 от 16.11.2017 // внимание! если программа не работает, обновите версию! begin var (a,b): =readinteger2; if a.iseven then writeln(a,' - четное') else writeln(b,' - четное') end. примеры 3 18 18 - четное 10 7 10 - четное 7 9 9 - четное - это неверно, нарушено условие (нет четных) 6 12 6 - четное - это верно, хоть условие и нарушено (оба четных)