С клавиатуры вводят слово. Составить программу, которая определяет, чётно или нечётно количество символов в слове

Question

Информатика

Димуля

2 ноября, 12:36

С клавиатуры вводят слово. Составить программу, которая определяет, чётно или нечётно количество символов в слове

+5

Ответы (1)

Знаете ответ на вопрос?

Марианна · Answer 1

uses crt;

var s: string;

begin

writeln ('Напишите слово') ;

readln (s) ;

if (length (s) mod 2 = 0) then

begin

writeln ('четное кол-во') ;

end

else writeln ('не четное') ;

end.