Заполни пропуски в программе.

Вывод на экран кубов чисел от 11 до 4.

var
:integer;
begin
for i:=
downto
do
writeln (i*i*i);
readln;
end.


2)Дано: fori:=1to23do

i изменяется от
до
с шагом
3)Запиши программу на языке Паскаль.

var
i,n:word;
begin
write('n=');
readln(n);
for i:=1 to n do begin write(i,' ');
end;
readln;
end.

На экране

n=2

4
2
12
0


4)Выбери верный ответ.

Программа, выводящая 35 раз слово "Russia".

var i : integer;
begin
i := 1 to 35 do
writeln ('Russia ');
readln;
end.
var i : integer;
begin
for i := 1 to 35 do
readln;
end.
var i : integer;
begin
for i := 1 downto 35
writeln ('Russia ');
readln;
end.
var i : integer;
begin
for i := 1 to 35 do
writeln ('Russia ');
readln;
end.
5)Запиши программу на языке Паскаль.
Определить, является ли число, введенное с клавиатуры простым.

Файл не выбран
Максимальный размер файла: 500 кБ

Ответы

Ответ дал: kroshpr
0

Ответ:

var i : integer;

begin

for i:= 11 downto 4 do begin  

writeln (i*i*i);

end;

readln;

end.

Объяснение: с   downto

Похожие вопросы