7fan7

с заданием по информатике(Pascal)

Посмотреть ответы (2)

Ответы

Ответ дал: ilyamaximov514

Здравствуй! Так не кто не делает

Объяснение:

Для ряда вычеслений нужны переменные и типы данных.

Чтобы пользоваться ими необходимо обьявить, а после тспользовать.

Var

a,b,c:real;

begin

a:＝3/2＋4;

b:＝a/3+5;

Похоже на это будет правильнее

Если ты вводишь x также обьяви его, а после будет 3*x/2+4

Строчками для наглядности, чтобв не запутатся. Если так писать будешь то вычеслений не будет

Смотри ответы от меня и после поймешь

Спасибо

Ответ дал: Гость

Закончились лекции, и студенты пошли домой (конъюнкция). в природе бывает, что солнце при дожде светит или прячется в тучах (дизъюнкция). в этом году летом мы либо поедем к морю, либо будем жить на даче (строгая дизъюнкция). если будет хорошая погода, то мы пойдем гулять (импликация). неверно, что 2 * 2 = 5 (инверсия). завтра мы не пойдем гулять (инверсия). я куплю ноутбук тогда и только тогда, когда получу премию (эквиваленция).

Ответ дал: Гость

function max (x,y : longint) : longint; begin if x> y then max: =x else max: =y; end; var k : longint; s : string; begin readln(s); while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin k: =k+1;

delete(s,max(max(pos('.',s),pos('! ',('? ',); end; writeln(k); end.