Войти Регистрация Спроси ai-bota

Напечатайте в столбик четные числа от 8 до 32 в паскале, ,

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

Annarasumanara2002

22.10.2020 13:21

Дано: 4 гигабайта скорость интернета 250кб/с сколько времени потребуется чтобы скачать файл...

isahak

29.12.2021 15:08

Средствами программы эксель вычислить значение функции y=x^2+1/x^2 и построить ее график на промежутке [2,4] c шагом h=0,2...

Kotik77789

29.12.2021 15:08

Даны два числа если первое больше второго то вывести их произведение в противном случае вывести их сумму...

Nikyyysik

19.09.2021 00:10

Вариант 2 1. цифровой алфавит, с которого возможно представить бесконечное множество чисел, состоит (укажи ложное утверждение): a) из одного знака-символа; б) из двух цифр - 1 и 0;...

tima3002

19.09.2021 00:10

1) определите значение целочисленных переменных a и b после выполнения фрагмента программы: a: =1819; b: =(a div 100)*10+9; a: =(10*b-a) mod 100...

almosya2005

19.09.2021 00:10

Переведите из 2-чной системы число: 1001111101. это число переведите в 8-чную 10-чную 16-чную...

taylakova090820

19.09.2021 00:10

Для какого значения х истинно высказывание (х 5)или не (x 3)...

Ckorpid

19.09.2021 00:10

Дан массив из водимых чисел из клавиатуры,массив 3x4(двумерный).найти количество четных элементов массива.исходный массив вывести на экран.(turbo pascal)....

Hause1

12.04.2022 19:05

Сколько символов текста можно передать за 256 секунд, используя модем, работающий со скоростью 8 кбит/с?...

никирек

12.04.2022 19:05

Пойдёт ли в тылу врага штурм на слабом пк...

Ответ:

Vinri

07.10.2020 02:42

Var i:byte;
begin
for i:=8 to 32 do begin
if (i mod 2)=0 then writeln(i);
end;
end.

0,0(0 оценок)

Ответ:

mysya4

07.10.2020 02:42

Четные числа:
var
a, b, s: integer;
begin
read (a, b);
for i := a to b do
if i mod 2=0 then
write (i, ` `);
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку