Var Summ,Mat,Fizik,Geogr,Biolog,Fizra:integer; Begin Writeln('Enter rating'); Readln(Mat,Fizik,Geogr,Biolog,Fizra); Summ:=Mat+Fizik+Geogr+Biolog+Fizra; Writeln(Summ); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку