Петя не может быть правым в обоих случаях так как получиться что и петя и женя написали на 5, а тк не может быть по условию. дальше подбираем под петю два оставшихся случая, при том что петя сказал 2 раза правду, но этого не может быть т.к. тогда женя говорит либо 2 неправды либо 50на50, говоря две неправды он противоречит пете о том что он не писал на 5 а говоря правду неправду противоречит и пете и саше. значит петя определенно сказал правду неправду, тогда подставив жене неправду а саше правду получаем что на 5 написал петя.
Const
n = 40;
var
s,i,ind,k1,k2: integer;
mas: array[1..n] of integer;
begin
s := 0;
for i:=1 to n do s := s+ mas[i];
Writeln ('сумма элементов массива: ',s);
s := 1;
for i:=1 to n do s := s * mas[i];
Writeln ('произведение элементов массива: ',s);
s := 0;
for i:=1 to n do s := s + mas[i]*mas[i];
Writeln ('сумма квадратов элементов массива: ',s);
s := 0;
for i:=1 to 6 do s := s+ mas[i];
Writeln ('сумма первых 6 элементов массива: ',s);
ind:=0;
repeat
Writeln('Введите К1: '); read(k1);
Writeln('Введите К2: '); read(k2);
if (k2>k1) then ind := 1;
until (ind=1);
s := 0;
for i:=k1 to k2 do s := s+ mas[i];
Writeln ('сумма элементов массива с k1-го по k2-й: ',s);
end.
Тема моего проекта "Видеокарта". Я выбрал эту тему, потому что я считаю, что это является острой темой при сборке ПК. Цель моей работы - рассказать, как правильно выбрать видеокарту и как за ней ухаживать. Проектным продуктом будет - корпус ПК. Этот продукт поможет достичь цель проекта, так как он поможет наглядно показать, какую важнейшую роль играет видеокарта. Я начал свою работу с того, что рассказал подробно о видеокарте, из чего она состоит. Потом я приступил к рассказу инструкции о правильной установке видеокарты в ПК и установке драйверов на видеокарту. Я завершил работу тем, что рассказал, как выбрать правильную видеокарту перед покупкой в магазине. Работа над проектом показала мне, что видеокарта - крайне важный элемент в ПК.
2Кбайт - 2 килобайта.
2Kбайт в байтах равен 2000 байтам. А значит что, реферат под номером два, больше по размеру.
Необходимости сохранение информации в формате .PDF - особой нету. Единственное что хочется сказать что это удобно. Почему? Потому что, "случайный" пользователь не сможет отредактировать файл, изменить текст, что даёт поверхностную безопасность. Также хочется отметить, что формат .PDF удобнее дня чтение, если это електроная книга, и в отличии от .fb2 и .epub имеет разумный вес.
Подводя итог,
.PDF .epub .fb2 - форматы для чтение, пассивного потребления информации, без возможности редактирования.
Формат портативных устройств.
.doc .docx .txt - форматы для активного редактирования и потребления информации.
Формат профессиональных устройств, компьютеров.
Задача
Дано число. Найти сумму и произведение его цифр.
Решение
Описание переменных:
n – число;
sum – сумма цифр;
mult – произведение цифр.
Алгоритм решения задачи:
<span>sum присвоить ноль.mult присвоить единицу (при умножении на ноль результат будет нулевым).<span>Пока n больше нуля <span>найти остаток от деления n на 10 (те. последнюю цифру числа), добавить его к сумме и увеличить произведение;избавиться от последнего разряда числа n путем деления нацело на число 10.</span></span></span>