Если я правильно понял задание:
public static void main(String[] args){
Scanner input = new Scanner();
int n = input.nextInt();
float x = input.nextFloat();
long a;
for (int i = 0; i<n; ++i){
a = i + x;
}
System.out.println(a);
}
Зона с охватом Wi-Fi ну как то так
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.ToWords.Count.Println
end.
<h2>Пример</h2>
Наша Маша громко плачет уронила в речку мячик
8
1)
Program hhh54;
var x:longint;
begin
read (x);
if ((x div 100) + ((x div 10) mod 10) + (x mod 10)) mod 2 <> 0 then write ('ЯВЛЯЕТСЯ')
else write ('НЕ ЯВЛЯЕТСЯ');
end.
2)
а)
Progran hhh54;
var i,k,x:longint;
begin
k:=0;
read (x);
while x <> 0 do
begin
if (x mod 10 = 6) and (x mod 4 = 0); then k:=k+1;
read (x);
end;
write (k);
<span>end.
</span>
б)
Progran hhh54;
var i,s,x:longint;
begin
s:=0;
read (x);
while x <> 0 do
begin
if (x mod 10 = 6) and (x mod 4 = 0); then s:=s+x;
read (x);
end;
write (s);
end.
Переносить по одному шару синего цвета в нишу => все шары могут оказаться на другой стороне и их можно будет выкатить