1)program p1;
var m,n: integer;
begin
write('вводите число: '); readln(n);
if n> =100 then
begin
m: = n mod 10;
writeln('последняя цира: ',m);
m: =n div 10 mod 10;
writeln('предпоследняя цира: ',m);
end;
end.
2)program p2;
var t1,t2,t3,d1,d2,d3,v1,v2,v3: integer;
vsr: real;
begin
write('вводите время езды(ч): '); readln(t1,t2,t3);
write('вводите скорость(км/ч): '); readln(v1,v2,v3);
d1: =v1*t1;
d2: =v2*t2;
d3: =v3*t3;
vsr: =(d1+d2+d3)/(t1+t2+t3);
writeln('средяя скорость= ',vsr: 1: 2,'км/ч');
end.
ответ:Из 4 чисел получается 6 сочетаний по 2 без повторений. Получаем эти суммы и Далее простым сравнением получаем максимальную сумму.
Объяснение:
int _tmain(int argc, _TCHAR* argv[])
{
int a, b, c, d;
int ab, ac, ad, bc, bd, cd;
int tmp;
char* m[6] = { "a + b", "a + c", "a + d", "b + c", "b + d", "c + d" } ;
char *ch;
cout << "Input a b c d " << endl;;
cin >> a >> b >> c >> d;
ab = a + b;
ac = a + c;
ad = a + d;
bc = b + c;
bd = b + d;
cd = c + d;
if (ab > ac)
{
tmp = ab; ch = m[0];
}
else
{
tmp = ac; ch = m[1];
}
if (tmp < ad)
{
tmp = ad; ch = m[2];
}
if (tmp < bc)
{
tmp = bc; ch = m[3];
}
if (tmp < bd)
{
tmp = bd; ch = m[4];
}
if (tmp < cd)
{
tmp = cd; ch = m[5];
}
cout << " max sum = " << ch <<" = " << tmp << endl;
return 0;
}
Форматування тексту (зміну тексту) роблять для того, аби внести зміни у зовнішній вигляд тексту: шрифт тексту, розмір, колір, місце взаємного розташування окремих об’єктів, зміна значень деяких властивостей графічних об’єктів, таблиць тощо. встановлення шрифту, кольору, накреслення символів, вирівнювання абзаців, параметрів сторінок тощо. Змінити значення параметрів форматування тексту можна за до нструментів груп Шрифт і Абзац вкладки Основне в Microsoft Word (панелі інструментів Форматування у LibreOffice Writer або відповідних вказівок контекстного меню виділеного фрагмента.