1) Определите , что будет напечатано в результате работы программы . Решение представьте в виде таблицы - id1184159820200621 от enrnud6 21.06.2020 09:21

Question

Информатика: 1) Определите , что будет напечатано в результате работы программы . Решение представьте в виде таблицы : program n 1; var s, k : inter , begin s :=0 ; k :=1 ; while k 7 do begin s :=s+10; k :=k+1 ; end ; writeln(‘s=‘, s) end . Ребята

enrnud6 · Accepted Answer

//PascalABC.Net 3.1 сборка 1200var    number: integer;    sum, sum_all, k: integer;begin    repeat        write( Элемент последовательности = );        readln(number);                if (number mod 10 = 2 ) and (number mod 4 = 0) then sum := sum + number;        if (number = 100) then k := k + 1;        sum_all := sum_all + number;    until number = 0;        writeln( Сумма всех чисел, которые кратны 4 и заканчиваются на цифру 2 = , sum);    writeln( Сумма всех = , sum_all);    writeln( Кол-во чисел,...

MOGZ ответил