Вот держи две проги в скринах !!!!!!!!!!!!!!!!!!!!!!!!!!!!
Получается 27 ячеек в Excel. А проще берёшь Эксель, выделяешь нужную область и считаешь кол-во ячеек:) на фотке посмотри
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (ke,ko):=(0,0);
loop 5 do
if ReadInteger.IsOdd then Inc(ko)
else Inc(ke);
Writeln('Четных ',ke,', нечетных ',ko)
end.
<span>function f1(t1){
if((t1/2)==parseInt(t1/2)) return "Число чётное"; else return "Число нечётное";
}
var a=prompt("Введите число");
alert(f1(a));<span>
</span></span>
1). x=1+5+5+5-3+8-7+2=16.
2). x=12-2+1-3+4-2-3-5=2.