Переменную рекомендуется делать мнемоническим.
В переменной допустимы только латинские буквы, цифры и нижний пробел,но переменная не может начинаться с цифры.
1+1=2*2=4+1=5
1+1=2+1=3*2=6*2=12*2=24+1=25*2=50
1*2=2+1=3*2=6*2=12*2=24*2=48+1=49*2=98+1=99
Program n_1;
var a:array [1..1000] of integer; i, buf:integer;
begin
for i:=1 to 1000 do begin
read(a[i]);
buf:=a[i];
while buf>9 do buf:=buf div 10;
if buf>a[i] mod 10 then write(a[i], ' ');
end;
end.
Пишу в питоне :
a= int(input())
b=int(input())
c=int(input())
if a > b and a > c :
print(a)
elif b > a and b > c:
print(b)
elif c > a and c > b :
print(c)
Все числа вводятся через enter!
=$E$3+C3 , индексы со знаком доллара не изменяются при копировании.