Program Bid;
Uses crt;
var a,b,max:integer;
begin
write(' Введите целое число a=');
readln(a);
write(' Введите целое число b=');
readln(b);
if a>=b then max:=a
else max:=b;
writeln('Max=',max);
end.
Задание 2:Program Text;
var x:integer;
begin
write('Введите цифру 1 или любую :');
readln(x);
if x=1 then write(' В а с я')
else write(' П е т я');
end.
Задание 3:Program Text;
var x:integer;
begin
write('Введите цифру 1, 2 или любую :');
readln(x);
if x=1 then write(' В а с я')
else if x=2 then write(' П е т я')
else write('ERROR');
end.
Задание 4:Program MaxFrom3;
begin
writeln('Введите 3 числа: ');
var (a, b, c) := ReadInteger3;
write('Наибольшее число: ', Max(a,b,c));
end.
Поделитесь своими знаниями, ответьте на вопрос:
Каким из правил не стоит руководствоваться при публикации информации в интернете? а)писать посты, руководствуясь первым эмоциональным порывом, с целью донести до читателя бурю своих переживаний б)публиковать сведения и комментарии о важных фактах и событиях только после ее проверки в нескольких первоисточниках в)выкладывать в сеть данные о другом человеке только в том случае, если он дал на это свое предварительное согласие г)оценивать публикуемую информацию с точки зрения друзей, взрослых людей и незнакомых пользователей д)все вышеперечисленные правила верны
Публикуй что хочешь, только позаботься сперва об анонимности на должном уровне: это Интернет. По смыслу тут выделяется пункт а) - писать, руководствуясь эмоциями, поэтому и вариант д) попадает, но что кому и как писать - дело только твоё.