Даны x,y,z. Определить переменные кратные 3 (делиться на три без остатка), в слу...

July 2022 1 7 Report

Даны x,y,z. Определить переменные кратные 3 (делиться на три без остатка), в случае отсутствия таких переменных напечатать соответствующие сообщения
Помогите, пожалуйста

Answers & Comments

ShirokovP

Verified answer

Var x, y, z, k: integer;

begin
readln(x, y, z);
k:=0;
if (x mod 3 = 0) then begin inc(k); writeln(x, ' кратно трем');end;
if(y mod 3 = 0) then begin inc(k); writeln(y, ' кратно трем');end;
if (z mod 3 = 0) then begin inc(k); writeln(z, ' кратно трем'); end;
if (k =0) then writeln('Переменных, кратных трем, не обнаружено!');
end.

2 votes Thanks 2

Answers & Comments

Verified answer

tri provodnika s soprotivleniem 20 om 15 om i 16 om soedineny posledovatelno o

kakie velichiny nazyvayut proporcionalnymiefc737352bee8e2f02dee2e3b734d84c 53453

molchane eto prichastie

najdite otrezki na kotorye bissektrisy ad treugolnika abc delit storonu bc es

reshite irracionalnoe uravnenie xx53

pomogite pozhalujsta sdelat slozhnyj plan po teme politika

Complete the sentences. Use the comparative (+ than) or superlative form or the ...

otrezki ab i cm peresekayutsya v tochke o tak chto acbm najdite dlinu otrezka cm22949c1ae0dfc170b974a414c136021a 65864

x1 ukazhite oblast opredeleniya funkciicdee6e4b5707ee67d7b0b9ef63f5adcb 50146

dajte opredelenie predmetu oipd

рекомендуемые вопросы

Helpful Links

Helpful Social