построить программу вывода на экран всех положительных целых чисел от 1 до N

@Timmi200068 · Регистрация: 28.03.2013

Студворк — интернет-сервис помощи студентам

@empty space · 28.03.2013, 20:49

Pascal

uses crt;
var  a, n: integer;
begin
writeln('Введите N');
readln(n);
a:=0;
for a:=1 to n do begin
if (a>0) then begin
writeln('Положительное число: ',a);
end;
end;
end.

Я бы не сказала, что задача уж так сложна.

@Timmi200068 0 / 0 / 0 Регистрация: 28.03.2013 Сообщений: 12
		1
	построить программу вывода на экран всех положительных целых чисел от 1 до N 28.03.2013, 16:25. Показов 2036. Ответов 1 Метки нет (Все метки) построить программу вывода на экран всех положительных целых чисел от 1 до N 0

Опции темы

построить программу вывода на экран всех положительных целых чисел от 1 до N

Решение