Program n1; Uses CRT; Const n=7; Var i,k,s: integer; begin for i:=10 to 99 do if i mod 2=1 then s:=s+i else k:=k+1; writeln('Summa nechetnyx =',s,' a chetnih chisel ',k); readln end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
