ПОМОГИТЕ РЕШИТЬ!!!!!!!!!!!!!!!!!!!! Весной лягушка мечет икру. 10-ую часть икринок съедают раки, 5% икринок вязнет в тине, 14% у
ПОМОГИТЕ РЕШИТЬ!!!!!!!!!!!!!!!!!!!!
Весной лягушка мечет икру. 10-ую часть икринок съедают раки, 5% икринок вязнет в тине, 14% уносит течение. Напишите программу для подсчёта икринок, которые станут головастиками. Первоначальное кол-во икринок необходимо ввести с клавиатуры.
Var i,n,s:integer; a:array[1..1000] of integer; begin readln(n); s:=0; for i:=1 to n do read(a[i]); for i:=1 to n do s:=s+a[i]; writeln(s); end.<span> </span>