Заполни пропуски в программе.
Вывод на экран кубов чисел от 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 кБ
Ответы
Ответ дал:
0
Ответ:
var i : integer;
begin
for i:= 11 downto 4 do begin
writeln (i*i*i);
end;
readln;
end.
Объяснение: с downto
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад