Событие А - первая буква гласная
Событие В - последняя буква гласная
Высказыванию НЕ(первая буква гласная И последняя буква гласная)
соответствует логическое выражение:
¬(A* B)= ¬A+¬B --> " первая не гласная или последняя не гласная"
---> 1) Иван 2) Пётр 3) Светлана
Var a,b:integer;
d:string;
begin
writeln('введите число');
readln(b);
Str (b, d);
for a:=length(d) downto 1 do begin
write(d[a]);
end;
writeln('');
<span>end.
</span>
(x>=10) and (x<100)
Третий вариант
Program sadadasf;
var i,k,l,m,s: integer;
A: Array[1..150] of integer;
begin
Writeln('Сколько чисел будет в массиве?');
readln(k);
l:=9999;
m:=-1000;
For i:=1 to k do
begin
Writeln('Введите элемент массива №',i);
Readln(A[i]);
If A[i]>m then m:=A[i];
If A[i]<l then l:=A[i];
end;
s:=m+l;
Writeln('Сумма минимального и максимального элемента массива: ',s);
<span>end.</span>