1
Programmering Dev-Pascal
Postat av HaggaИ ♥ den 18 November 2010, 04:00
11 kommentarer · 90 träffar
Ska göra ett program som summerar alla tal mellan 100 och 200
så 100+101+102+103... osv
vad gör jag för fel?
(använd denna form av sats, inte case eller liknande, det är denna delen vi testas på);
program summera;
var i: Integer;
begin
for i := 100 to 200 do
begin
i := (i + 1);
Writeln(i);
end;
readln;
e nd.
utdatan blir istället 201 :s
så 100+101+102+103... osv
vad gör jag för fel?
(använd denna form av sats, inte case eller liknande, det är denna delen vi testas på);
program summera;
var i: Integer;
begin
for i := 100 to 200 do
begin
i := (i + 1);
Writeln(i);
end;
readln;
e nd.
utdatan blir istället 201 :s
