Бейсик Python
FOR n = 1 TO 100
A(n) = n - 10
NEXT n
FOR n = 1 TO 100
B(n) = A(n)*n;
NEXT n
for n in range(1, 101):
A[n] = n - 10
for n in range(1, 101):
B[n] = A[n]*n
Паскаль Алгоритмический язык
for n : = 1 to 100
do A[n] : = n - 10;
for n : = 1 to 100 do begin
B[n]:= A[n]*n;
end;
n от 1 до 100
A[n] : = n - 10
n от 1 до 100
B[n]:=A[n]*n
for (n = 1; n <= 100; n++) {
A[n] = n - 10;
for (n = 1; n <= 100; n++) {
B[n] = A[n]*n;
1) program n_1;
var a:array[1..100] of integer;
i, n:integer;
begin
writeln('Введите кол-во элементов');
readln(n);
for i:=1 to n do
begin
a[i]:=random(450)+250;
writeln(a[i],' ');
end;
end.
подстрока S0 вставляется в строку S в позицию номер 5
результат: ExamABCple
V1 - только это монета встречается во всех взвешиваниях.