Var
A: integer;
begin
readLn(A);
if (A mod 2 = 0) then
begin
A := sqr(A);
WriteLn('Квадрат введённого числа равен: ', A);
end else
begin
A := ((A mod 100) div 10) + (A mod 10) + (A div 100);
writeLn('Сумма цифр введённого числа равна: ', A);
end;
end.
Считаем, что изменением температуры воздуха можно пренебречь:
var t,t1:real; i:integer;
begin
t:=100;
t1:=20;
for i:=0 to 15 do
begin
writeln('Через ',i,' мин. - ',t:4:1,' градусов');
t:=t-(t-t1)*0.03;
end;
end.
Результат:
<span>Через 0 мин. - 100.0 градусов
Через 1 мин. - 97.6 градусов
Через 2 мин. - 95.3 градусов
...
</span><span>Через 14 мин. - 72.2 градусов
Через 15 мин. - 70.7 градусов</span>
C++
#include <iostream>
using namespace std;
int main() {
int a, b, c;
cin >> a >> b >> c;
if ((a + b + c) == 180 ) {
cout << "These are the angles of the triangle" << endl;
if ((a == 90) || (b == 90) || (c == 90)) {
cout << "Rectangular";
} else {
cout << "Not rectangular";
}
} else {
cout << "These are not the angles of the triangle";
}
return 0;
}
<span>1) 117 не подходит, т.к. максимум 7+7 = 16, а там 17. Или 11 больше 7.</span>
<span>3) 1511 не подходит, т.к. 15 больше 11.</span>
<span>4) 1517 не подходит, т.к. максимум 7+7 = 16, а там 17.</span>
<span>Значит ответ 2) 1213</span>
