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

155

383

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

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

SupercellTV

Информатика

4,4(19 оценок)

S=0 for i=10 to 99 step 2 s=s+i next print "summa=" s end

danilcs02

Информатика

4,4(49 оценок)

1. program n1; var i,n,s: integer; begin n: =-1; s: =0; for i: =1 to 50 do begin n: =n+2; s: =s+n; end; writeln('сумма=',s); end.2. program venom; var v,r: real; begin while r< =250 do begin readln(r); writeln('рост=',r); v: =r-100; writeln('вес=',v); end; end.