Составить программу, печатающую значение true, если указанное высказывание истинно, и false, в противном случае:


1. Хотя бы одна цифра данного трехзначного числа N равна S.

2. Числа N и R являются нечетными.

1

Ответы и объяснения

2013-12-02T20:55:48+00:00
Program akifieva70;
var n,s,r:integer;
begin
write('n=');read(n);
write('s=');read(s);
if (n div 100 = s) or (n mod 10 = s) or (n div 10 mod 10 = s)
then write('TRUE')else write('FALSE');
writeln;
write('n=');read(n);
write('r=');read(r);
if (r mod 2 <>0) and (n mod 2<>0)  
then write('TRUE')else write('FALSE');
end.
Большое спасибо)))))♥♥♥
Всегда рад помочь, но чтобы отблагодарить не нужно писать благодарностей, а достаточно нажать кнопку спасибо!