Program xxx;
uses CRT;
var
a, i:integer;
begin
readln(a);
while (a<>0) do
begin
write(a mod 10);
a := a div 10;
end;
<span>end.</span>
Ответ:
1)точно такое количество букв?
2)планшет
3)процессор
4)ОЗУ
5)шина
Public static void SomeAction()
{
int number = 0;
int sum = 0;
<span>int num = int.Parse(Console.ReadLine());</span>
while (num != 0)
{
if (num % 5 == 0 && num % 7 != 0)
{
sum += num;
number++;
}
num = int.Parse(Console.ReadLine());
}
Console.WriteLine("Количество требуемых чисел: " + number);
Console.WriteLine("Их сумма: " + sum);
}