Регистрация
Ростик22812312
02.09.2022 14:34
Информатика
Есть ответ 👍

Дано трёхзначное число. найти число, полученное при перестановке второй и третьей цифры заданного числа. в паскале abc

274
399
Посмотреть ответы 2

Ответы на вопрос:

rekardo
rekardo
4,7(30 оценок)
Var a: integer;   begin  writeln('введите число');   read(a);   a : = a div 100*100 + a mod 10*10+ a mod 100 div 10;   writeln(a);   end.
gagag590
gagag590
4,4(42 оценок)
Var   a,b: integer; begin     writeln('введите два числа');   readln(a);   readln(b);   if (a*a=b) or (b*b=a) then       writeln('вывод  1') else writeln('вывод  0');   readln; end. {тест} введите два числа 25 5 вывод  1

Популярно: Информатика