Записать условие, которое является истинным, когда целое А не кратно трем и оканчивается нулем. Программа на Pascal ABC.NET

Ответы

var a: integer;
begin
        readln(a);
        if ((a mod 3 <> 0) and (a mod 10 = 0)) then
                writeln('истина')
        else
                write('ложь');
end;
07.06.16

Елена Васильевна

Читать ответы

Виктор Щебетун

Читать ответы

Мутовкин Александр

Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика