Решить в паскале. 1) в двузначное число вписать ноль в середину и получить трехзначное число 2)задано двузначное число. чему равна первая цифра числа?
102
353
Ответы на вопрос:
1) var x: inreger; begin readln(x); x: =((x div 10)*100)+(x mod 10); writeln(x); end. 2) var x: integer; begin readln(x); x: =x div 10; writeln(x); end.
Program dvyzna4; var i: integer; begin repeat writeln('введите число='); readln(i); until (i> =10) and (i< =99); writeln('1-ая цифра=',i div 10); writeln('трехзначное=',i div 10,'0',i mod 10); end.
Популярно: Информатика
-
alenakoslova15.04.2021 13:31
-
nikzarubenko08.06.2022 02:15
-
alexandra15205.01.2021 18:00
-
Kotik21028.03.2023 07:09
-
Ira21Irina2119.08.2021 06:12
-
zombovizor20.09.2022 09:43
-
nurasylmahambet23.03.2021 20:05
-
Kuznetsova890328.10.2020 15:11
-
barenzi26.09.2020 22:06
-
ashbringer1233225.12.2021 12:49