1.y=m1*m2/Sqr(r)
2. Program my;
var S,a,b,h:real;
begin
write('Введите длины оснований и высоты');
readln(a,b,h);
S:=(a+b)*h/2;
readln(S);
end.
3. Program my;
var a:integer;
begin
writeln('Введите трехзначное число');
readln(a);
If (a mod 10=7) then write('Данное число заканчивается на 7');
else write('Данное число не заканчивается на 7');
end.
4.Program my;
var a,b,:integer;
begin
readln(a,b);
If (a>b) then writeln(Sqr(a), b+10);
If (a=b) then writeln('Числа равны');
If (a<b) then writeln(Sqr(b), a+10);
end.
5.
Program my;
var a,b,c:integer;
begin
Readln(a,b);
For c:=a to b do
if (c mod 10=0) then
writeln (c);
end.
1}
Саша: «Я никогда не призывал к прогулу {ЛОЖЬ}, это была идея Коли {ЛОЖЬ}».
Коля: «Я никогда не предложил бы это первым{ПРАВДА}, во всем виноват Вова{ЛОЖЬ}».
Вова: «Эта идея пришла в голову Коле{ЛОЖЬ}. Я просто пошел за компанию{ПРАВДА}».
ОТвет: Зачинщик Саша.
2}
Допустим, первый болельщик ошибся насчёт Димы. Тогда:
Первый: «первым будет Дима{ЛОЖЬ}, а Миша будет вторым{ПРАВДА}»
Второй: «Катя займет четвертое место{ПРАВДА}, а второе место достанется Нине{ЛОЖЬ}»
Третий: «Катя займет третье место{ЛОЖЬ}, а на втором месте будет Дима{ПРАВДА}»
Это противоречит условию, потому что получается что второе место заняли сразу и Нина и Дима. Значит первый болельщик угадал, что Дима будет на 1-м месте:
Первый: «первым будет Дима{ПРАВДА}, а Миша будет вторым{ЛОЖЬ}»
Второй: «Катя займет четвертое место{ЛОЖЬ}, а второе место достанется Нине{ПРАВДА}»
Третий: «Катя займет третье место{ПРАВДА}, а на втором месте будет Дима{ЛОЖЬ}»
ОТвет: места распределились так: Дима 1-е, Нина 2-е, Катя 3-е, Миша 4-е
3}
Поскольку все назвали разные веса, то угадал только один. Значит двое других оба угадали материал. Это возможно только если гирька медная. Значит:
Алеша: «латунь{ЛОЖЬ}, 5 г{ПРАВДА}»
Витя: «медь{ПРАВДА}, 3 г{ЛОЖЬ}»
Игорь: «не латунь{ПРАВДА}, 4 г{ЛОЖЬ}».
ОТвет: медная гирька весом 5 г
можешь так же сделать с файлами. Например с фотографиями или с музыкой.
или можешь зайти в галерею найти видео которые идут больше 2-3 минут и удалить их (потому что они много "весят") как то так