tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Программа паскаль. даны
Программа паскаль. даны 2 числа a и b. выведите (через пробел) все четные числа от a до b (включительно)
ZakFeir
3 24.06.2019 17:40
5
Ответы
Olzhas2889
20.07.2020 07:28
var a, b: integer;
begin
write('Введите a и b: ');
read(a, b);
while a<b do
begin
if a mod 2 = 0 then
begin
write(a, ' ');
a:=a+2;
end
else
a:=a+1;
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
famm2
20.07.2019 09:10
Как называется узел дерева, у которого нет потомков?...
Дора18119
20.07.2019 09:10
Впаскале выдает ошибка: ожидался идентификатор надо вывести на экран четные числа из промежутка 1: 30 000 ( возможно, решение неправильное) program do 30000; uses crt; var x...
Erzhan030
20.07.2019 09:10
Оцените информационный объем следующего предложения в кодировке кои-8: можно получить все, но не все сразу...
Chillin
09.03.2019 05:10
№132. дан прямоугольник со сторонами a и b. сколько квадратов со стороной с можно из него вырезать. №146. вывести на печать переменные а, в, с в порядке их возрастания. оператор...
ГГЧОЧОЧ
12.03.2019 23:45
Нужна ! мне нужны только сами программы, можно даже не все, а, хотя бы два номера. но желательно, конечно, все.заранее...
Соничка55555
12.03.2019 23:52
Необходимо написать программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 2.программа получает на вход количество чисел...
vikylyalol
30.11.2020 15:06
Какую задачу решает процедура «Primer»? procedure primer(a,b: integer; var m: integer); begin if a b then т =а else m:=b: end. 1) находит максимум из двух чисел 2) меняет местами...
Виталя236
30.11.2020 15:06
Написать программу на С Дан массив чисел с плавающей точкой A[N]. Заменить все его элементы, большие введённого с клавиатуры числа Z, этим числом. Подсчитать количество таких...
kataysinkevich
30.11.2020 15:06
SOS SOS SOS SOS SOS SOS SOS...
krazy4550
07.09.2019 13:20
Программа на c++ напишите программу, которая вводит два целых числа и находит их произведение, не используя операцию умножения. учтите, что числа могут быть отрицательными....
Популярные вопросы
Найти du/dl если u=z^2(x+y) в точке m(0; 1; -3) если l=(2; 2; 1)...
3
Фрекен бок открыла собственную кондитерскую. она сама печет и продает плюшки....
2
Какое равенство устанавливает правовое государство?...
3
Найти производную функции: у=(2х³-3)(3х²-2)...
1
Докажите, что выражение х^2-4х+5 принимает положительные значения при всех...
2
[tex]3x^{4} +8x^{3} -3x^{2}=0[/tex]↓ [tex]x^{3}-9x^{2}-x+9=0[/tex]↓...
3
По розобрать реакцию горения с 31-35 илимент...
1
Собрать электрическую цепь ( источник тока, ключ, лампочка, амперметр, реостат(...
2
Что такое полис демос ареопаг архонт...
1
Красных и белых в гражданской войне...
1
begin
write('Введите a и b: ');
read(a, b);
while a<b do
begin
if a mod 2 = 0 then
begin
write(a, ' ');
a:=a+2;
end
else
a:=a+1;
end;
end.