var
a, b: string;
c: integer;
begin
writeln('Введите первое слово: ');
readln(a);
writeln('Введите второе слово: ');
readln(b);
c := length(a) - length(b);
if c = 0 then writeln('Длины слов равны')
else if c > 0 then writeln('Первое слово длиннее второго на ', c)
else writeln('Второе слово длиннее первого на ', -c)
end.
2)
var a: string;
begin
writeln('Введите предложение: ');
readln(a);
case a[length(a)] of
'.': writeln('Предложение повествовательное');
'!': writeln('Предложение восклицательное');
'?': writeln('Предложение вопросительное');
end;
end.
3)
var
a: string;
t: char;
begin
writeln('Введите слово: ');
readln(a);
t := a[1];
a[1] := a[length(a)];
a[length(a)] := t;
writeln('Полученное слово: ', a)
end.<span> </span>
Ответ:
1.1; 2.4; 3,4; 4,3; 1)союз; 2)22; 3)Семён; 4)Коралл; 6)Классификация Основание для искусственной классификации - любые легко различимые признаки
Объяснение:
Ответ:
344 Кбайт
Объяснение:
скорость - 256000 бит/с
время - 11 с
1) 256000*11=2816000 бит
2) 2816000:8=352000 байт (тк в байте 8 бит)
3) 352:1024=343,75 Кбайт (тк в килобайте 1024 байт)
343,75 округляется до 344
<em>1.Краткая запись</em>
<em>2.Решение</em>
<em>3.Ответ</em>