Правильные решения и ответы на любые задания для школьника или студента быстро онлайн. А если не нашли нужное решение или ответ, то задайте свой вопрос нашим специалистам.
0 голосов

написать программу на языке паскаля

1)Дано натуральное число. Определить является ли оно чётным

2)дано натуральное число. Определить оканчивается ли оно цифрой 7.

от (80 баллов) 6 в категории Информатика

1 Ответ

0 голосов
 
Лучший ответ

Задача 1

program xxx;

   var n : integer;

begin

   write('введите число n=');

   readln(n);

   if n mod 2 = 0 then write('четное') else write ('нечетное');

   realdn

end.

 

Задача 2

program xxx;

   var n : integer;

begin

   write('введите число n=');

   readln(n);

   e := n mod 10

   if e = 7 then write('заканчивается на 7') else write ('не заканчивается на 7');

   realdn

end.

 

от Доцент (52.1k баллов) 2 3 4
...