Question

Найти сумму чисел, оканчивающиеся цифрой 4, из 5 введенных. паскаль​

Answer 1

Ответ:

program Hello;

var x,i,sum:integer;

begin

sum:=0;

For i:=1 to 5 do

   begin

       readln(x);

       if x mod 10 = 4 then sum:=sum+x;

   end;

writeln(sum);

end.

Объяснение: