Четные числа до 300

Четные числа до 300

Вывести на экран все трехзначные числа,кратные 8
ПОМОГИТЕ ПРОШУ

  • Попроси больше объяснений
  • Следить
  • Отметить нарушение

Полика 12.04.2016

Ответ

Проверено экспертом

// Задание №1
var
a,s: integer;
begin
a:=300;
repeat
s:=s+a;
a:=a+2;
until a>400;
writeln(‘s = ‘, s)
end.

// Задание №2
var
a: integer;
begin
a:=100;
repeat
if a mod 8 = 0 then write(a:4);
a:=a+1;
until a>999;
end.

  • Комментарии (2)
  • Отметить нарушение

Ответ

Проверено экспертом

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
begin
Write(Range(300,400,2).Sum)
end.

Результат выполнения программы:
17850

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
begin
Range(104,999,8).Print
end.

Результат выполнения программы:
104 112 120 128 136 144 152 160 168 176 184 192 200 208 216 224 232 240 248 256 264 272 280 288 296 304 312 320 328 336 344 352 360 368 376 384 392 400 408 416 424 432 440 448 456 464 472 480 488 496 504 512 520 528 536 544 552 560 568 576 584 592 600 608 616 624 632 640 648 656 664 672 680 688 696 704 712 720 728 736 744 752 760 768 776 784 792 800 808 816 824 832 840 848 856 864 872 880 888 896 904 912 920 928 936 944 952 960 968 976 984 992

Автор Вася Пяточкин задал вопрос в разделе Естественные науки

напишите нечетные числа от 1 до 300 через запятую напишите нечетные числа от 1 до 300 через запятую и получил лучший ответ

Ответ от Завулон Планк[гуру]
$ seq -f "%g," 1 2 299 xargs echo -n
1, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 67, 69, 71, 73, 75, 77, 79, 81, 83, 85, 87, 89, 91, 93, 95, 97, 99, 101, 103, 105, 107, 109, 111, 113, 115, 117, 119, 121, 123, 125, 127, 129, 131, 133, 135, 137, 139, 141, 143, 145, 147, 149, 151, 153, 155, 157, 159, 161, 163, 165, 167, 169, 171, 173, 175, 177, 179, 181, 183, 185, 187, 189, 191, 193, 195, 197, 199, 201, 203, 205, 207, 209, 211, 213, 215, 217, 219, 221, 223, 225, 227, 229, 231, 233, 235, 237, 239, 241, 243, 245, 247, 249, 251, 253, 255, 257, 259, 261, 263, 265, 267, 269, 271, 273, 275, 277, 279, 281, 283, 285, 287, 289, 291, 293, 295, 297, 299
Источник: Учись пользоваться компом, молодежь!
Завулон Планк
Просветленный
(24379)
У меня не Windows, я выполнил команду в терминале на Маке, Mac OS — это UNIX-like система.
Но это не беда, этих терминалов (прямо в интернете, работающих браузере) можно много найти.
Можно скопировать, например, сюда по правой кнопке мыши, потом так же скопировать обратно.
seq -f "%g," 1 2 299 xargs echo -n

Читайте также:  Пакетное добавление водяного знака

Разделение чисел на четные и нечетные произошло благодаря простому делителю 2 . Число считается четным, если оно делится на 2 без остатка, и нечетным, если при делении образуется остаток 1 . Определить четность или нечетность числа можно, пользуясь признаками делимости на 2 , то есть последней цифрой числа должна быть 0,2,4,6 или 8 .
В алгебраической записи четные числа имеют вид a=2n , а нечетные a=2n+1 .

Ссылка на основную публикацию
Чем чистить датчик абсолютного давления
ВСЁ СВОИМИ РУКАМИ 12.06.2018 . . После покупки Шевроле Лачетти оказалось, что эта первая моя машина, на которой был установлен...
Фото авы удаленного вк
Рабочий способ который на 100 процентов поможет вам вернуть и восстановить вашу удаленную фотографию в социальной сети вконтакте. Мы постарались...
Фото внутренностей айфон 6
Шаг 1 Время обзора iPhone 6! Давайте посмотрим на некоторые технические спецификации: Процессор Apple A8 с 64-битной архитектурой Копроцессор движения...
Чем хорош увлажнитель воздуха отзывы
у нас на работе стоял, попеременно двигали каждый к себе поближе, ибо да, с ним как-то лучше, мне лично глазам...
Adblock detector