begin
var a := ArrRandom(10, 1, 10); a.Println;
for var i := 0 to a.High do
if i.isOdd then a[i] *= 2
else a[i] *= 3;
a.Println;
end.
1
x = int(input('Введите x: '))
print('y =', 2 * pow(x, 0.5))
print('y =', pow(x + 2, 2))
print('z =', 14 * pow(x, 2) + 11 - 17)
2
import math
s, v_1, v_2 = int(input('Введите S: ')), int(input('Введите v1: ')), int(input('Введите v2: '))
print(math.ceil(s / (v_1 + v_2)))
И кстати, пример не правильный, т.к. когда вы используете просто команду input(), то она не преобразует строку в число, а оставляет ее строкой, то есть если вы ввели 5, то и переменная будет хранить значение '5' как строку(как слово), а строковый тип не поддерживает операцию перемножения саму на себя, то есть если вы умножите '5'(типа str) на '5'(типа str) это будет соответствовать умножению слова 'гриб' на слово 'дерево', а это невозможно.
Чтобы исправить эту ошибку нужно 'оборачивать' input() в int(), то есть должно получиться int(input()), как написал я.
const n=10;
var i:integer;
a:array[1..n] of integer;
begin
for i:=1 to n do
begin
a[i]:=random(10)+1;
write(a[i]:2,' ');
if i mod 2 = 0 then a[i]:=a[i]*2
else a[i]:=a[i]*3
end;
writeln;
for i:=1 to n do write(a[i]:2,' ')
end.