Записать условие, которое является истинным, когда целое А не кратно трем и оканчивается нулем. Программа на 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

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

Сейчас на сайте
Читать ответы

Константин

Сейчас на сайте
Читать ответы

Alexander

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