Регистрация
daniiltarasenko9
27.08.2021 11:51
Информатика
Есть ответ 👍

Внеобходимо составить программу на алгоритмическом языке visual basic. причем, программа должны быть записаны в двух вариантах: в первом варианте необходимо использовать оператор условного перехода tо, а во втором − операторы цикла , next. заранее : 3

172
239
Посмотреть ответы 1

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

GenaTurboKrytt
GenaTurboKrytt
4,7(88 оценок)
Вот решение. program m1; var s,x: integer; begin s: =0; x: =1; while x< > 0 do begin read(x); if (x mod 7=0) and (i mod 10=0) then s: =x+s; end; writeln('summa=',s); end.

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