tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
1)составить программу(паскаль)
1)составить программу(паскаль) вывода на экран всех нечетных двухзначных чисел. 2)составить программу вычисления суммы всех трехзначных чисел, кратных 5
Таиса432156789
3 18.05.2019 15:10
0
Ответы
Dan4ik7211
11.06.2020 21:29
1)
var
i: integer;
begin
for i := 10 to 99 do
if i mod 2 = 0 then
write(i, ' ');
end.
2)
var
i, s: integer;
begin
for i := 100 to 999 do
if i mod 5 = 0 then
s := s + i;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ruff071
21.05.2019 11:40
Разработать схему алгоритма, который запрашивает n произведений целых чисел и ищет их сумму , число n вводится ч клавиатуры. (где) s-cумма ; k- первое число; m-последнее число; i-счетчик...
ЛитвиновGLEB
17.08.2019 18:00
Какие видовые понятия входят в родовое понятие знак...
Daasshha1
27.03.2019 22:00
1)детали из меди и стали массой по 10кг нагреты до температуры их плавления.для плавления какого из этих тел потребуется большее количество теплоты? во сколько раз? 2)сколько граммов...
imaya88
27.03.2019 22:00
Ca3(po4)2 - p - p2o5 - ca(h2po4)2 - ca3(po4)2...
beysekeevadaniy
27.03.2019 22:00
Составить небольшой текст описание своей комнаты .в тексте должны быть прилагательные с общим лексичиским значением цвета ,размера,материала,формы....
ovveall
27.03.2019 22:00
Расположите числа двоичной системы счисления в порядке убывания (от большего к меньшему). числа: 1000, 1010, 1100, 1110, 1001...
isackanova
27.03.2019 22:00
Решить на логику, надо к завтрашнему ! путешественник покупая в магазине необходимые продукты для похода при рассчете сначала передал 1-му продавцу половину своих денег и ещё 1000...
Иванчик1111
27.03.2019 22:00
Найти меньшую высоту треугольника со сторонами 24 см , 25 см , 7 см ....
27.03.2019 22:00
Соотнесите буквы со словами: а. при температуре ноль градусов вещество будет только в твоедом состоянии б. при кристализации 1 кг выделит наибольшее количество теплоты в. при температуре...
hdjddngddh
27.03.2019 22:00
Напишите, , сочинение почему я люблю язык и как мне язык в будущем! не меньше 500 слов. на и перевод! заранее ! ваша агентэсса! ; )...
Популярные вопросы
Найдите значение y соответствующие значение x=0 для линейного уравнения 7x+7y-21=0...
1
Рассмотрите таблицу и выполните задания. Отличайте союзы от других частей речи!...
3
виберіть у бібліотеці або вдома дві книги, які ви хотіли б порадити друзям. Напишіть...
2
ТоДочь ... и ... .мотри картину В.М. Васнецоваурочка». На ее созданиеника вдохновила...
2
Причиной аллопатрического (географического) видообразования может быть: 1.изменение...
3
Сенкан до персонажа Генрі Хіггінс. З п єси Пігмаліон...
2
5. Розв яжи задачу в робочому ЗОШНІТМураха проїхала на гусениці деяку відстань...
2
Решите задание. Ничего не понимаю в нём...
3
Какое множество является подмножеством множества [3;32]? 1.(1;32] 2.(1;3) 3.(4;31)...
1
Пользуясь картами атласа, опишите физико-географическую единицу, в которой вы...
2
var
i: integer;
begin
for i := 10 to 99 do
if i mod 2 = 0 then
write(i, ' ');
end.
2)
var
i, s: integer;
begin
for i := 100 to 999 do
if i mod 5 = 0 then
s := s + i;
writeln(s);
end.