tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу в паскале
Написать программу в паскале напечатать все положительные нечётные трёхзначные числа
Aind1
2 20.08.2019 14:00
0
Ответы
Черничка21
05.10.2020 07:23
Program rd;
var i:integer;
begin
for i:=100 to 999 do if i mod 2 = 1 then write(i,' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
zebrakod
05.10.2020 07:23
PascalABC.NET 3.2
begin Range(101,999,2).Println end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lianabalkoewa
18.05.2020 11:23
Https://edu.skysmart.ru/student/befoxahuzi Решите когда перейдёте по ссылке напишите имя Рамазан Курбанов а логин пароль и номер пишите любой...
xnxnxnxnx
17.06.2019 21:40
№1. измерьте информационный объем сообщения «ура! скоро новый год! » в битах, байтах, килобайтах (кб), мегабайтах (мб)....
Baidu
17.06.2019 21:40
Водномерном массиве попарно размещены на первом месте значение аргумента. на втором-значение функции.напечатать эти значения так,в первом столбике-аргумент,во втором,функция...
Ydalxa534
17.06.2019 21:40
Составить программу в паскале. даны стороны треугольника а,в,с.найти его периметр....
Софи1234567890я
10.04.2020 11:46
с информатикой! 7 класс, хотя это нужно не мне :)...
XMCBVSAJHDBV
10.04.2020 11:45
Всем привет, как изменить программу, чтобы она выводила не второй по величине элемент массива, а третий? Буду очень признательна program Pascal; const n=10; Var i, j: Integer;...
bossHor
21.05.2019 08:20
Найти сумму целых положительных чисел из промежутка от а до в, кратных 4 (значения переменных а и в вводятся клавиатуры)...
olyamin0
21.05.2019 08:20
Не разбираюсь в паскале вообще. с использованием функции. составить функцию, которая определяет, сколько зерен попросил положить на n-ую клетку изобретатель шахмат( на...
fajzullaevamar
21.05.2019 08:20
Определите, что будет напечатано в результате выполнения следующего алгоритма var a,b: integer; begin a: =0; b: =2364; while b 0 do begin if b mod 10 5 then a: =a+b mod...
teaonline
04.04.2020 01:54
Напишите формулу вычисления площади прямоугольника...
Популярные вопросы
Кого і що зображено на картинках...
3
Написать форму построения перечисленных произведений 1 Л. Бетховен 1часть...
3
Ребят мне с этим билетом. Буду очень благодарна. Характерные черты современного...
3
Найти силу тока в цепи состоящей из источника ЭДС E = 13В и вертикально...
3
решить две задачи по теории вероятности. 1) В жеребьевке участвуют m...
1
Расставьте знаки препинания и ошибки исправьте Из дома своего окна я...
3
Complete the dialogue. Закончите диалог. A: Would you like...
2
Мемлекеттік Ресми нышаны . орысша қалай болады...
3
Найдите лишнее слово.обоснуйте свой выбор 1)Д..обежать,д..брый,д..ехать....
3
Образец разбора: 1.Голубое (небо)- имя прилаг., небо(какое?) голубое.2.Нач.ф.-...
2
var i:integer;
begin
for i:=100 to 999 do if i mod 2 = 1 then write(i,' ');
end.
begin Range(101,999,2).Println end.