using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
//Напишите программу,которая в последовательности целых чисел определяет количество чисел,кратных 5 или 9.
//Программа получает на вход целые числа,количество введённых чисел неизвестно,последовательность чисел заканчивается числом 0.
//Количество чисел не превышает 1000.Введённые числа по модулю не превышают 30 000.Программа должна вывести одно число:количество чисел,кратных 5 или 9.
int n = 0; // количество
int a = int.Parse(Console.ReadLine());
while (a != 0)
{
if (a % 5 == 0 || a % 9 == 0)
n++;
a = int.Parse(Console.ReadLine());
}
Console.WriteLine(n);
Console.ReadKey();
}
}
}
program HelloWorld;
var N: integer;
var i,ii: integer;
var y: real;
begin
writeln('Введите значение N:');
readln(N);
for i:=N downto 2 do
if i mod 2 = 0 then
begin
y := 2;
for ii:=1 to i-1 do
y := y*2;
writeln(y:10:0);
end;
end.