Главная /
Решение олимпиадных задач по информатике /
В результате выполнения программы, фрагмент которой приведен ниже … n:=5; for i:=n downto 1 do write (n-i+1); … выводится ряд чисел:
В результате выполнения программы, фрагмент которой приведен ниже
выводится ряд чисел:
вопросПравильный ответ:
1 2 3 4 5
0 1 2 3 4
4 3 2 1 0
5 4 3 2 1
6 5 4 3 2
Сложность вопроса
61
Сложность курса: Решение олимпиадных задач по информатике
77
Оценить вопрос
Комментарии:
Аноним
Нереально сложно
10 июл 2019
Другие ответы на вопросы из темы программирование интуит.
-
#
Решение задачи: "Даны гири массами
. Как можно взвесить предмет массой
, при чем гири можно класть на разные чашы весов" возможно методом:
- # Решение задачи: "Необходимо представить число 40 в виде суммы неповторяющихся слагаемых (одинаковые по значению, противоположные по знаку слагаемые считаются разными" возможно методом:
-
#
Для организации перевода числа а из десятичной в
-ричную систему счисления, программа на Паскале (начальный фрагмент которой приведен ниже)
…
readln (a, n);
i:=0;
while (a<>0) do
begin
i:=i+1;
x[i]:=a mod n;
a:=a div n;
end;
…
должна быть продолжена так:
-
#
Найдите ошибки в приведенной ниже программе на Паскале, которая выполняет перевод числа a из
-ричной системы счисления (b<10) в 10-тичную:
var a: string;
b, i, st, n, s, x, k:integer;
begin
readln (a); readln(b); n:=length(a); s:=0;
for i:=1 to n do
begin
val (copy(a,i,1),x,k); s:=s+x*st; st:=st*b;
end;
writeln (s);
end.
- # Приведенный ниже фрагмент программы на Паскале реализует алгоритм заполнения Арифметического квадрата. … for i:=1 to n do begin a[i,1]:=1; a[1,i]:=1; end; for i:=1 to n do for j:=1 to n do a[i,j]:=a[i-1,j]+a[i,j-1]; … Найдите в нем ошибку:
. Как можно взвесить предмет массой
, при чем гири можно класть на разные чашы весов" возможно методом:
-ричную систему счисления, программа на Паскале (начальный фрагмент которой приведен ниже)
…
readln (a, n);
i:=0;
while (a<>0) do
begin
i:=i+1;
x[i]:=a mod n;
a:=a div n;
end;
…
должна быть продолжена так:
-ричной системы счисления (b<10) в 10-тичную:
var a: string;
b, i, st, n, s, x, k:integer;
begin
readln (a); readln(b); n:=length(a); s:=0;
for i:=1 to n do
begin
val (copy(a,i,1),x,k); s:=s+x*st; st:=st*b;
end;
writeln (s);
end.