Ответы на вопрос:
1) program chik; var a,b: integer; begin read(a,b,c); if(a mod b=0)then writeln('делиться')else writeln('не делиться'); end. 2) program chik2; var a: integer; begin read(a); if(a mod 2=0)then writeln('да')else writeln('no'); end. 3) program chik3; var a,b,c,max: integer; begin read(a,b,c); max: =a; if(b> max)then max: =b; if(c> max)then max: =c; writeln(max); end.
Популярно: Информатика
-
dimaborysyk9931.07.2022 18:07
-
Слон14503.03.2023 11:04
-
asdfghjkl1234718.01.2020 00:51
-
Kulimshina27.12.2020 16:40
-
logpol4025.01.2023 00:12
-
ZigFinde26.07.2021 11:21
-
dcveergh08.05.2022 12:19
-
vikulazvezdocka05.08.2021 12:17
-
EvkShaih10.08.2021 07:42
-
NastyaPaz26.06.2023 04:00