1. Информатика
  2. Написать программу для

Написать программу для выделения цифр из четырехзначного натурального числа.
На языке Pascal

grenzygaming grenzygaming    3   28.04.2021 15:45    0

Ответы
ddfdffdf ddfdffdf  28.04.2021 15:50

program n_4;

var n: Integer;

begin

ReadLn(n); WriteLn(n div 10 mod 100);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
saha12389085 saha12389085  01.06.2019 20:00
знайти суму чисел від 1 до 1000 кратних 10 и знайти добуток чисел від 0 до 2000 кратних 5...
дир2 дир2  01.06.2019 20:00
Решите : а) трех друзей зовут вова, слава и никита. кто-то из них потерял солдатика. их другу егору сказали: 1. солдатикапотерял не вова. 2. солдатика потерял слава. но оказалось,...
эдики эдики  01.06.2019 20:00
Напишите программу. (в паскале) дан радиус (r) окружности. найти длину окружности (с) и площадь круга (s). с=2 пr. s=пr^2...
Sashenka585888 Sashenka585888  01.06.2019 20:00
Введите значение x и вычислите значение функции f=x*x+5/x-7 нужно составить программу. ....
kimyan123makc kimyan123makc  01.06.2019 19:50
Нужно написать программу на паскале. вычислить среднеарифметическое четных элементов массива c(10), не меньших 10...
boss110 boss110  01.06.2019 19:50
Даны 3 числа a,b,c.определите сколько из них отрицательных. сделайте блок схему что надо вводить в программу...
danilmuratov20p02c8m danilmuratov20p02c8m  01.06.2019 19:50
Разработайте алгоритм и напишите программу которая определяет можно ли построить треугольник длинами сторон которого являются числа a b c....
Нукку95 Нукку95  01.06.2019 18:45
От 1000 до 1100 найти числа, сумма цифр которых = 15 и вывести количество таких чисел. python 3 выручайте, ((...
zenkov2000cemen zenkov2000cemen  01.06.2019 18:46
Это полный пи***, у меня цп загружается на 20-100% при том, что ничего не включено, этот trustedinstaller, system, svchost бесят, я 2 раза сбрасывал компьютер на заводских настроек,...
St151 St151  01.06.2019 18:52
Python 3. найти числа от 1000 до 1100 сумма цифр которого = 15 , , все...

Популярные вопросы