Программисты, алло

[Fox.gg]

В шараге дали задачку тип д/з прям надо срочно решить:
Даны 2 числа a и b (A>B) найти сумму всех четных чисел от a до b и вывести на экран все нечетные числа
и тип еще нужно решить 3 способами ( For, While, repeat )
Мб кто хелпанет? или какой нить гайд скинет
p.s на паскале это усе

 

[AdmiralSirokosan]

На каком языке?

 

[ImSterben]

В шараге дали задачку тип д/з прям надо срочно решить:
Даны 2 числа a и b (A>B) найти сумму всех четных чисел от a до b и вывести на экран все нечетные числа
и тип еще нужно решить 3 способами ( For, While, repeat )
Мб кто хелпанет? или какой нить гайд скинет

+ язык

 

[Fox.gg]

А, пля, Паскаль

 

[AdmiralSirokosan]

Могу на Javascript сделать)

 

[Fox.gg]

Могу на Javascript сделать)

эмм.. ну.. меня неправильно поймут в шараге

 

[lelik56]

Отпиши в лс)

 

[RightSeNN]

Могу на Javascript сделать)

эмм.. ну.. меня неправильно поймут в шараге

Ахах.

 

[AdmiralSirokosan]

Там все просто , тебе надо сделать цикс,в который входит 2 числа - а и б, циклом мы перебираем все значения от а к б, выводим в массив и суммируем!

 

[Fox.gg]

Там все просто , тебе надо сделать цикс,в который входит 2 числа - а и б, циклом мы перебираем все значения от а к б, выводим в массив и суммируем!

Ну эт да.. словами понятно
а мне бы как нибудь наглядно это усе

 

[MrZergus2]

Var A, B, i, s: longint;
begin
read(A,B);
for i:=A to B do begin
if i mod 2 =0 then s:=s+i else write (i, ' ');
end;
writeln(s);
end.

давно не писал, попробуй, может заработает

 

[Fox.gg]

Var A, B, i, s: longint;
begin
read(A,B);
for i:=A to B do begin
if i mod 2 =0 then s:=s+i else write (i, ' ');
end;
writeln(s);
end.

давно не писал, попробуй, может заработает

шоолее работает

 

[sasha11723]

Так хочется помочь, но лень думать на паскаль
если бы делфи, то изи