Первое пустое это 8
2е 129 а третье z
Ответ:
Var
X, i: longint;
Begin
Readln(l);
For x := - 100 to 100 do
Begin
If l*x-5*x+2*l=2 then writeln(x);
End;
End.
Задание 1:
Var n,i:integer;
begin
readln(n);
for i:=1 to n do
write(i,',');
writeln;
<span>end.
Задание 2:
Var n,i:integer;
begin
readln(n);
for i:=n to 1 do
write(i,',');
writeln;
<span>end.
Задание 3:
Var n,k,i:integer;
begin
writeln('Введите N');
readln(n);
writeln('Введите K');
readln(k);
for i:=1 to n do
write(k,',');
writeln;
<span>end.
<u>Научитесь наконец писать разборчиво задания! Ничего не понятно!!!</u></span></span></span>
1 слово жарка или аркан. 2 слово тепло
Если число четное, то оно кратно 2. Если число кратно одновременно 2 и 7, то оно кратно из произведению, т.е. 14. Первое такое двухзначное число - это само число 14. Остальные будут получаться путем добавления 14, т.е. получаем ряд 14, 28, 42. ...
<em>// PascalABC.NET 3.2, сборка 1407 от 18.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Range(14,99,14).Println
end.
<u>Результат</u>
14 28 42 56 70 84 98