//з № 1var s,d,f,max:integer;beginRead(s,d,f);if (s > d)and (s > f) thenmax:= selse if (d > s) and (d > f) thenmax:= delse if (f > d) and(f > s) then max:=f;write('max ',max);end.
//з № 2 var x:real; r:integer;beginwrite('Введите число x =');Read(x);if Frac(x)=0 then beginwriteln('x - целое число!');r:=round(x);if ((r mod 2)=0) then writeln('Число четное')else writeln('Число нечетное');endelse writeln('x - дробное число!')end.
//з № 3var a:integer;beginwrite('Введите число а =');Read(a);if (a > 0)and (a <= 5) thena:= a *a*aelse if (a > 5) thena:= a*aelsea:=a;write('a = ',a);end.
Объяснение:
печатная машина может показаться совершенно безвредной, но иногда она может оказаться не в пользу вас или вашего бизнеса, поскольку не обеспечивает оптимального качества печати при необходимости больше всего. если принтер canon не подключен к вашему устройству или беспроводной сети (если принтер беспроводной), он не может печатать. итак, вам нужно сразу создать соответствующую настройку беспроводного принтера canon. если вам нужна дополнительная по этому поводу, то вы можете связаться с опытными ценителями. для этого вам просто нужно позвонить по бесплатному номеру и соединиться с ними по телефону.
Поделитесь своими знаниями, ответьте на вопрос:
30 ! 5. письмо вася и его друг том увлекаются криптографией, поэтому часто пишут друг другу зашифрованные послания. сегодня вася получил от тома такое сообщение: 72 97 112 112 121 32 67 104 114 105 115 116 109 97 115 33 вася знает, что в этом сообщении, кроме букв могут быть только пробелы и знаки препинания. васе расшифровать сообщение тома. в качестве ответа выведите получившуюся строку. комментарий. в сообщении тома коды символов разделены пробелом, в ответ нужно вывести строку без дополнительных пробелов. например, если код 10 11 12 12 вы расшифровали как a пробел u u, то в ответе надо указать строку a uu.
Happy Christmas!