Var a,b,c: integer;
Begin
write('Введите двузначное число: ');
readln (a);
b:=a div 10;
c:=a mod 10;
writeln('<span>Перевернутое число: </span>',c,b)
End.
n - кол-во чисел
i - цикловая переменная
а - число
max - максимальное число, оканчивающееся на 3
Язык програмирования: Паскаль.
var
n,i,a,max: integer;
begin
readln(n);
max := -1;
for i := 1 to n do
begin
readln(a);
if (a mod 10 = 3) and (a > max) then
max := a;
end;
writeln(max)
end.
Подробнее - на Znanija.com - znanija.com/task/2373420#readmore
56600:1000=56.6
ответ: модем передаст 56.6 да минуту
Логические выражения все, кроме В.