lalama1

Labai labai aciu už pagalba!

raso 2 prie kiekvieno s

man is esmes svarbiausia tas if, nes abejoju ar gerai isvis jis....

tada isvis atsakymas gaunas 144 intervale nuo 10 20 :(

ivedant skaicius 10 20 raso 2

Kitaip meta errora

Sveiki, kodel man blogai skaiciuoja ? Ka blogai darau? Salyga: Apskaičiuoti kiek natūraliųjų skaičių yra intervale [a,g] yra skaičių, kuriuos padalinus iš 4, gaunasi skaičių, kurie baigiasi 2. program Noname0; Var a, g, s, i:integer; begin Read (a, g); for i:= a to g do begin if i div 4 mod 10=2 then s:= s+1 else writeln('s=', s ); end; read (s); end.