Составить программу которая показывает количество чётных чисел между числами а и б. с клавиатуры вводятся два числа а выводится количество чётных чисел между ними. ! !

261

380

Посмотреть ответы 2

Ответы на вопрос:

povarnicyna106

Информатика

4,6(86 оценок)

Program helloworld; var a,b,c,i: integer; begin readln(a); readln(b); c: =0; for i: =a to 10 do if (i mod 2=0) then inc(c); writeln(c); end.

aika194

Информатика

4,6(40 оценок)

// pascalabc.net 3.2, сборка 1363 от 17.12.2016 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(5,-99,99); write('а: '); a.println; var b: =arrrandom(5,-99,99); write('b: '); b.println; var c: =a.where(x-> x.iseven).concat(b.where(x-> x.; write('c: '); c.println; var d: =a.where(x-> x> 0).concat(b.where(x-> x> ; write('d: '); d.println end. пример а: 88 72 -30 8 5 b: -95 28 -62 17 -87 c: 88 72 -30 8 28 -62 d: 88 72 8 5 28 17