59

Паскаль Дано четырехзначное натуральное число…

dv067 18 марта 2023

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

категория: информатика

33

Program Z1; uses crt; var x,a,b: integer; begin Clrscr; write ('Chislo: '); readln (x); b: =x mod 10; a: =x div 1000; write (a,',b); readlnend.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...