Регистрация
Dufrenb
04.10.2020 13:52
Информатика
Есть ответ 👍

1.дано трехзначное число. найти число единиц в нем число десятков в нем сумму его цифр произведение его цифр 2.дано трехзначное число. найти число. найти число, полученное при прочтении его цифр справа налево

276
287
Посмотреть ответы 2

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

annakostomarova
annakostomarova
4,8(87 оценок)
Var    n, n1, n2, n3: integer; begin    write('введите трехзначное число: ');     readln(n);     if not ((n > = 100 ) and (n < = 999)) then writeln('не верный вводд числа')    else    begin        n1 : = n div 100;         n2 : = n div 10 mod 10;         n3 : = n mod 10;                   writeln('1 - ', n3, n2, n1);         writeln('2 - ', n3, n1, n2);         writeln('3 - ', n2, n1, n3);     end; end.
гора7р
гора7р
4,5(25 оценок)
Втом что 100 - это тип данных integer (целое число), а 100.0 - это тип данных real (дробные)

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