• 18 March 2017
    • Українська література
    • Автор: Kirbrutmen

    Вывести на экран все четные числа из отрезка от a до b, при этом границы отрезка заведомо правильно вводятся с клавиатуры. Паскаль, цикл while

    • Ответ оставил: Мненужнпомошь
    Var  a,b:integer;begin  Write('Введите a и b: '); Read(a,b);  if a mod 2<>0 then inc(a);  while a<=b do begin    Write(a,' ');    a:=a+2    endend.ПримерВведите a и b:...
    • Ответ оставил: Мненужнпомошь
    Program n1;var a,b: integer;beginreadln(a,b);if a mod 2<>0 then a:=a+1;while a<=b dobeginwrite(a,' ');a:=a+2;end;end.
    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предметы...

Последние опубликованные вопросы