Вывести на экран все четные числа, начиная с числа n и заканчивая числом m подсказска: i это текущие значения n до m значит от начала до конца , начальное число n, концовое m mod использоватсья надо, поомгите ,
program z1; uses crt; var n,m,i:integer; begin repeat writeln('Введите числа'); readln(n,m); until n<m; for i:=n to m do begin if i mod 2 =0 then write(i:4); end; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку