Question

Составьте программу, определяющую, является ли последняя цифра введенного целого числа (любого) четной ли нечётной

Answer 1

program pr1;
var a:integer;
begin
writeln('Введите число');
readln(a);
if a mod 2 = 0 then
writeln('Это число чётное')
else
writeln('Это нечётное число');
end.

program pr2;
var i, sum:integer;
begin
sum:=0;
i:=2;
while (i<=13) do
begin
writeln(i);
if (i mod 2 = 0) then
begin
sum:=sum+i;
end;
i:=i+1;
end;
writeln('Сумма чётных чисел: ', sum);
end.

Answer 2

еще и C++ знаю

Answer 3

мы такие (i&lt) не проходили

Answer 4

Ладно, удачи!

Answer 5

а мы паскаль походим с 7, сейчас в 9

Answer 6

спасибо большое