Считай варианты.
Плюшка с кофе.
Плюшка с соком
Плюшка с кефиром
Плюшка с чаем.
И столько же только с бутербродом вместо плюшки.
И того 8 вариантов
Const N = 20;
Var i,k:integer; m:array [1..N] of integer;
Begin
randomize;
for i:=1 to N do begin
m[i]:=random(101) - 50;
writeln(m[i]);
end;
for i:=1 to N do
if m[i] mod 2 <> 0 then
inc(k);
writeln('Kol-vo netchetnih = ',k);
readln;
end.
<span>
</span>
print('Вводите числа в одной строке через пробел:')
a = list(map(int,input('Ввод: ').split()))
max = -99999
min = 99999
pos = -1
maxpos = False
for i in a:
if i > max:
max = i
if i < min:
min = i
for i in a:
pos += 1
if (i == max) and (maxpos == False):
maxpos = pos
if i == min:
minpos = pos
a[maxpos] = min
a[minpos] = max
print('Вывод: ',end='')
for i in range(0,len(a)):
print(a[i],end=' ')
я так понимаю x2- это х в квадрате ,а х4 - х в четвёртой степени
Program z1;
Uses Crt;
var x:integer;
y:longint;
begin
clrscr;
write('Введите x:');
readln(x);
y:=(1-(x*x)+5*(x*x*x*x))*2;
writeln('y=',y);
readkey;
end.