Показать полную графическую версию : [решено] Не принимает задачу
Светлана96
19-02-2012, 12:50
Даны два целых числа A и B (при этом A≤B). Выведите все числа от A до B включительно.
Program z3528;
var a,b,i:integer;
begin
read(a,b);
for i:=a to b do
write(i);
end.
Как сделать чтоб числа через пробел выводились?
исправить
for i:=a to b do
write(i);
на
for i:=a to b do
begin
write(i);
write(' '); // в общем надо добавить вывод пустого символа в теле цикла
end;
Светлана96, вы же уже создавали тему, где нужно было тоже выводить через пробел, вам уже ответили.
Вы принципиально не хотите ни в чем разбираться?
Hector, можно и за один write
write(i + ' ');
меньше строк кода
LilLoco, да понятно, не смог вспомнить правильный синтаксис, pascal давно был ;)
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.