Напишите программу, которая в последовательности - вопрос №9951152 от ботан777 21.04.2021 19:43

Question

Информатика: Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 4. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, оканчивающееся на 4. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число - сумму чисел, оканчивающихся на 4. ​

ботан777 · Answer

var n, a, s : integer;begin    write( количество чисел: );    readln(n);    write( ввести числа: );    for var i := 1 to n  do begin        read(a);        if a mod 10 = 4 then s+= a    end;    writeln;    writeln(s);end....