FOR A=10 TO 1 STEP -3
5-9 класс
|
S=S+A
PRINT A;
NEXT A
PRINT S
END
Решите пожалуйста.Желательно полный ответ.
A=10 S=0+10=10 вывод 10
A =7 S=10+7=17 вывод 7
A =4 S=17+4 =21 вывод 4
A= 1 S=21+1 =22 вывод 1
A=-2 вывод 22
Другие вопросы из категории
информации.сколько всего пар перчаток было в ящике?
ВОПРОС 2
Наведение указателя мыши на значок объекта и задержка его на некотрое время называется ...
Вариант 1 зависанием
Вариант 2 двойным щелчком
Вариант 3 перетаскиванием
Вариант 4 протягиванием
ВОПРОС 5 Как создать документ, папку?
Вариант 1 только с помощью команды меню Файл -> Создать и выбрать тип объекта
Вариант 2 с помощью команды меню Файл -> Создать или контекстного меню
Вариант 3 вызвать контекстное меню, нажав правую кнопку мыши
Вариант 4 нарисовать новую папку, используя инструмент карандаш
ВОПРОС 6 Как выделить несколько файлов или папок, идущих подряд? Вариант 1 с помощью клавиш <Ctrl>+<A>
Вариант 2 выбрать команду Правка-> Выделить все
Вариант 3 выделить имя первого файла, нажать клавишу <Shift >и выделить последний файл из группы
.Вариант 4 нажать <Ctrl >и щелкать по именам нужных файлов.
ВОПРОС 11 Как завершить работу с программой (приложением)? Вариант 1<Alt>+<F4> или команда Файл -> Выход
Вариант 2 кнопка Закрыть или команда Файл -> Выход
Вариант 3<Alt>+<F4>, кнопка Закрыть или команда Файл -> Выход
Вариант 4<Alt>+<Tab>
ВОПРОС 16 Ярлык – это ...
Вариант 1 ссылка на объект, расположенный не на Рабочем столе, а в какой-то папке.
Вариант 2 копия файла, папки или программы
Вариант 3 папка
Вариант 4 значок со стрелкой, позволяющий изменять свойства объекта
ВОПРОС 21 Для получения дополнительных функций других клавиш необходимо: Вариант 1 удерживая клавишу <Shift>, нажать другую клавишу;
Вариант 2 удерживая клавишу <Alt>, нажать другую клавишу;
Вариант 3 удерживая клавишу <Ctrl>, нажать другую клавишу;
Вариант 4 удерживая клавишу <Shift>,<Alt> или <Ctrl> нажать другую клавишу;
ВОПРОС 30 Нажатие какой клавиши (не всегда , но часто) вызывает выход из режима программы или отмену предыдущей команды, действия?
Вариант 1 Esc
Вариант 2 Tab
Вариант 3 Enter
Вариант 4 Delete
Читайте также
Do
Read(a[i]);
For i:=1 to 20 Do
a[i]:=a[i]/10;
For i:=1 to 20 Do
Write(a[i])
End.
{n} := (n-80)*(n-80);
for n:=1 to 100 do
B {101-n} :=A {n};
Какой элемент массива В будет наибольшим?
1) В {1} 2) B {21} 3) B {80} 4) B {100}
Program prim2;
Var x, y: real;
Begin
For x:=-10 to 10 do
Begin
y:-sqr (x);
Writeln ( x,' ', y)
end;
End.
For i:=-10 to -3 do
A [ i ] := 2*I;
2) Начертить получившийся массив и обозначить его индексы:
K:=1;
For i:=-10 to -3 do
begin
A [ i ] : 2*I+k;
K:=k*2
End;
фрагмента программы.
var k, s:integer;
befin
s:=10
for k=10 to 11 do
s:=s+k;
write(s)
end.