tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Нужна информатика плз .вывести
Нужна информатика плз .вывести на экран числа в диапазоне от 10 до 50,которые остаток 0 от деления на число,введённое пользователем.
Vika15077
3 20.08.2019 14:20
0
Ответы
varich83
08.09.2020 20:35
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
begin
var n:=ReadInteger('n=');
n.Step(n).TakeWhile(x->x<=50).Println
end.
ПОКАЗАТЬ ОТВЕТЫ
maltsevaalbina2006
08.09.2020 20:35
Var inp,i:integer;
begin
readln(inp);
for i:=10 to 50 do
if (i mod inp=0) then write(i,' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ротилуся1
12.03.2021 12:14
Выбери режимы датчика цвета с которых можно распознать поля верных ответа два...
Полина2684
10.08.2019 14:50
Составьте программу, с которой из слова железнодорожник получаются слова: донор колено крокодил (язык pascal)...
alena10003
10.08.2019 14:50
Создать систему числения(с буквами и подписать использованные буквы и придумать название...
макс3093
10.08.2019 14:50
1укажите какая величина определяет количество уровней громкости … 2 представьте число -52 в шестнадцати разрядном представлении...
Azalia1324
10.08.2019 14:50
Создать программу получения и обработки одномерного массива – вектора: вычислить значение положительных элементов всего массива....
zimenko201411
10.08.2019 14:50
Создать программу получения и обработки одномерного массива – вектора: определить наименьший элемент элемент нечетных по номеру элементов второй четверти массива....
alenashumaher
23.10.2020 11:43
Какие программы относятся к текстовым редакторам?...
Lizaliya
23.10.2020 11:43
Сымсыз желелердін турлерін диапазоның өсу ретемен орналастыр инфарматика...
нюра42
19.06.2019 06:10
Паскаль авс в искусственный водоем запустили 100 000 рыб. ежегодно из водоема забирают 12% рыб. естественный прирост сост. 20%. какое количество рыб будет в водоеме...
kimvlad1712
19.06.2019 06:10
Однажды в артеке за круглым столом оказалось пятеро из москвы, санкт-петербурга, новгорода, перми и томска: юра, толя, леша, коля и витя. москвич сидел между томичем...
Популярные вопросы
Из двух городов навстречу друг другу выехали два поезда. скорость...
3
Язык. 9-11 класса. тема: время глагола. past simple или present...
1
Выполни дейчтвия 2дм 3см+ 6дм8см-7см...
1
Скласти оповідання на любу тему. будь-ласка дуже треба на !...
1
Tom already (to buy ) a new book в повествовательной форме отрецательной...
1
Вкаком из перечисленных случаев совершаешься механическая работа?...
1
3предложения с сложными однородными сказуемыми....
3
Втр-е аbсd высота=4 основание 3 и 7. найти площадь....
2
Укажите матеррик где отсутствует тайга а. азия . северная . южная...
2
Сочинить японское трехстишие(хокку)...
3
begin
var n:=ReadInteger('n=');
n.Step(n).TakeWhile(x->x<=50).Println
end.
begin
readln(inp);
for i:=10 to 50 do
if (i mod inp=0) then write(i,' ');
end.