N=Fv
F=N/v = 4000000/25=16000 Н
42 км 120м - 42120 м; 179км 500м - 179500м; 86 км 35 м - 86035м; 49 км - 49000 м; 5 км 6м - 5006м.
Капс лог писать большими буквами
па дж давн опуститься вниз страницы
дельте стереть букву справа от мигающей палочки (ну когда печатаешь)
uses crt;
var ch,a:integer;
begin
readln(ch);
readln(A);
if ((ch div 10)+( ch mod 10)) mod a = 0 then
writeln('YES') else writeln('NO');
readln;
end.
2.
uses crt;
var i,os:integer;
a:array[1..31] of integer;
begin
randomize;
os:=0;
for i:=1 to 31 do
begin
a[i]:=random(5)+0;
if a[i]=0 then inc(os);
end;
for i:=1 to 31 do
write(a[i],' ');
writeln;
if os = 10 then
writeln('YES') else writeln('NO');
readln;
end.