tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Паскаль. задано натуральное
Паскаль. задано натуральное число n. вывести первые две цифры заданного числа.
samayazeynalova02
2 01.09.2019 23:40
0
Ответы
гога61
06.10.2020 10:46
Var n:integer;
Begin
Write('n = ');ReadLn(n);
While n div 100 > 0 do
Begin
n:=n div 10
End;
WriteLn(n)
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
bersenevaksenia1
16.07.2019 09:30
Какое количество информации несет в себе сообщение о том, что нужная вам программа находится на одной из 16 дискет?...
helissieble
30.06.2019 18:30
Для данного n составить алгоритм вычисления значения выражения: sin1 + sin2 + sin3! + sin4! + … + sinn!...
Karina5252
30.06.2019 18:30
50 . в паскаль. написать программу, которая вводит массив из n целых чисел и выводит на экран сам массив и сумму всех его элементов....
aidarisiev80
30.06.2019 18:30
Файл размером 3 мбайта передаётся через некоторое соединение за 2 минуты 30 секунд. определите размер файла (в мб), за которое можно передать через это же соединение за 50 секунд....
kodwaw
30.06.2019 18:20
Составьте пограмму вычисления суммы 100 первых членов арифметической прогрессии,если а1=5; d=4...
Valeriya0412
30.06.2019 18:20
По стовбуру повзе жук. за ніч він піднімається на 6 м, а за день опускається на 3 м. почавши повзти від основи стовбура, він за п яту ніч доповз до його вершини. яка висота...
skata9196
30.06.2019 18:20
Рассчитайте время звучания моноаудиофайла^1, если при 16-битовом кодировании и частоте дискретизации 32 000 его объем равен 3500 кбайт. ^1 режим моно предполагает запись одной...
katyasergienko2004
30.06.2019 18:10
Нужно решить на паскале (abc) дано предложение, в котором имеется несколько букв е. найти: а) порядковый номер первой из них; б) порядковый номер последней из них....
Лианиа
30.06.2019 18:10
Составить программу, которая просит ввести любое число в интервале от 1 до 30, затем подсчитывает произведение чисел кратных 5 в интервале от 0 до введённого числа....
marusy552
30.06.2019 18:10
Создать массив из 5 элементов,заполнить его случайными числами от -3 до 8 и вывести элементы на экран....
Популярные вопросы
Приставка к слову зима скажи как можно быстрее...
2
Решите систему: (2х+1): 5=(у-1): 2 4х+5у=23...
3
Відразу після старту космічний корабель рухається вертикально вгору з прискоренням...
1
1. кто и когда, на основе каких опытов впервые наблюдал беспорядочное движение...
2
Discuss. what do you think? 1) whose holiday was the most exsitihg ? why?...
3
Выразите в указанных еденицах измерения. 7 890 = . 35 006= __д.. 105 090...
3
Чему равен результат сложения двух чисел, записанных римскими цифрами: mcm+lxviii?...
2
Как извлечь корень, представив подкоренное выражение в виде произведения...
3
Теплоход шёл 2ч против течения и 3ч по течению. собственая скорость теплохода...
2
Образы огня,воды и воздуха в изобразительно-прикладном искусстве...
2
Begin
Write('n = ');ReadLn(n);
While n div 100 > 0 do
Begin
n:=n div 10
End;
WriteLn(n)
End.