. Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 6 и оканчивающихся на 6. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность через repeat until

//FPC 2.6.4varsum, n: integer;beginrepeatreadln (n);if (n mod 10 = 6) and (n mod 6 = 0) then inc(sum, n);until n=0;write (sum);readln();end.#Python 3.6.0summ, n = 0, input().split()for i in n:  if (int(i)%10==6) and (int(i)%6==0): summ+=n;print (summ)//Borland C++ 10#include <iostream.h>using namespace std;int main(){int sum=0, n;do{cin>>n; if((n%10==6) && (n%6==0)) sum+=n;}while(n!=0);cout>>sum;return 0;}