в этой книге ровно 99 неверных утверждений, так как одно утверждеие-то верное.
Ответ дал: Гость
паскаль:
uses crt;
var a,b: string; \ а-слово ,b-символ
i: integer; \ переменная для счета
begin
writeln ('слово и символ');
readln (a,b); \\ввод данных
for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а и сравнение каждого с символом b. вывод ответа. или ответов
readkey; \\если символы в слове повторяются
end.
Ответ дал: Гость
Закончились лекции, и студенты пошли домой (конъюнкция). в природе бывает, что солнце при дожде светит или прячется в тучах (дизъюнкция). в этом году летом мы либо поедем к морю, либо будем жить на даче (строгая дизъюнкция). если будет хорошая погода, то мы пойдем гулять (импликация). неверно, что 2 * 2 = 5 (инверсия). завтра мы не пойдем гулять (инверсия). я куплю ноутбук тогда и только тогда, когда получу премию (эквиваленция).
Ответ дал: Гость
program ml; uses crt; var x,i: integer; w,l: real; beginclrscr; readln(x); l: =x; for i: =1 to x do beginw: =w+1; l: =x/w; if frac(l) = 0 then writeln(l: 2: 0); end; readkey; end.
Популярные вопросы