Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
1Booooooooooom1
27.07.2021 21:42 •
Информатика
Дано натуральное трехзначное число n. составьте программу, выводящую четырехзначное число, полученное приписыванием цифры разряда единиц исходного числа к нему же слева (в разряд тысяч).
Показать ответ
Ответ:
MishaDen3009
08.07.2020 21:19
Program Pr1;
uses crt;
var fl1,fl2:text;
n,tmp:string;
Begin
clrscr;
assign(fl1,'input.txt');
assign(fl2,'output.txt');
reset(fl1);
readln(fl1,n);
close(fl1);
tmp:=copy(n,length(n),1);
n:=tmp+n;
rewrite(fl2);
writeln(fl2,n);
close(fl2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Sofa29122005
06.03.2021 13:45
Основная мысль произведения Г.В. Черноголовиной «Сказка об одном зёрнышке» ЗАДАНИЕ ОТ УЧИТЕЛЯКластер написать...
13022010
16.03.2020 19:00
Сумма цифр Дано четырёхзначное число. Найдите сумму его цифр. Примеры Ввод Вывод 2020 4...
арана19
02.09.2022 10:25
Л 6. Для следующей задачи выполните рисунок, придумайте реше- ние и оформите его в виде схемы. По каналу один за другим идут три теплохода: «Обь», Восток» и «Петропавловск»....
vitalyrtss
14.10.2021 11:52
Выбери атрибут, который задает цвет текста с Тkinter Python. foreground (fg) background (bg) height width...
kery99
26.01.2021 20:50
Используя цикл for вычислить сумму 7-ми произвольных чисел, введенных с клавиатуры.составить для паскаль. буду...
lexelol2005
24.05.2020 13:53
Верно ли указан порт датчика цвета в предложенном программном коде? 1. Нет,неверно, датчик цвета подключён к порту No 3 2. Нет,неверно, датчик цвета не подключён к основному...
aikena2005
13.10.2022 08:19
Напишите программу на языке Паскаля вычисляет стоимость покупки в магазине для определения будем считать что в покупаемый набор входят апельсины и яблоки с клавиатуры вводятся:...
diankafedulova
08.12.2020 15:59
1.Приведите к стандартному виду и определите степень одночлена а) 5х3·3ху2 b) (1,2х4у2)2·(0,2х2у) [ ] c) 213а45∙12743...
lehmannastyaaovt8b2
16.03.2022 07:28
найдите неизвестные линейные элементы ∆MNK (угол K=90°) №4 №6...
SashaV2003
30.06.2020 02:06
аталған өсімдіктердің тобындағы ағзаларының құрамына кіретін мүшелерін тандаңыз ашықтұқымдылар балдырлар мүктер жабықтұқымдылар...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses crt;
var fl1,fl2:text;
n,tmp:string;
Begin
clrscr;
assign(fl1,'input.txt');
assign(fl2,'output.txt');
reset(fl1);
readln(fl1,n);
close(fl1);
tmp:=copy(n,length(n),1);
n:=tmp+n;
rewrite(fl2);
writeln(fl2,n);
close(fl2);
end.