Напишите программу, которая в последовательности - вопрос №8914371 от Leraekb2012 30.01.2022 20:37

Question

Информатика: Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 3 и оканчивающихся на 2. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, кратное 3 и оканчивающееся на 2.

Leraekb2012 · Answer

Varn,i,a,k:integer;s:string;beginreadln(n);for i:=1 to n dobeginread(a);str(a,s);if ((s[length(s-1)]= 2 )and((a mod 3)=0))then k:=k+1;end;writeln(k);end....