8. Вам необходимо отправить практическую работу по информатике учителю через канал С пропускной Мбит/с. Сколько времени Понадобится для передачи практической работы объемом 760 Кбайт? (напишите ответ внизу) Мой ответ П О М О Г И Т Е П А Ж А Л У С Т А
Не знаю на каком языке надо было, но сделал на языке Pascal
1.
var s:string;
k,i:integer;
begin
readln(s);
k := length(s);
writeln(k);
end.
2.
var a,b:string;
i:integer;
begin
writeln('Введите первую фамилию');
readln(a);
writeln('Введите вторую фамилию');
readln(b);
i:=length(a)-length(b);
if i>0 then
writeln('Первая фамилия длиннее')
else writeln('Вторая фамилия длиннее')
end.
еще как вариант второго номера:
var a,b:string;
i:integer;
begin
writeln('Введите первую фамилию');
readln(a);
writeln('Введите вторую фамилию');
readln(b);
i:=length(a)-length(b);
if i>0 then
writeln('Фамилия ', a, ' длиннее фамилии ', b)
else writeln('Фамилия ', b, ' длиннее фамилии ', a)
end.
# Пусть белый цвет это false и соответственно черный true
эта функция определяет цвет по ее координатам, которые не больше числа 8
def checkColor(x, y):
assert x <= 8 and y <= 8
color = None
if x % 2 == 0:
if y % 2 == 0:
color = True
else:
color = False
else:
if y % 2 == 0:
color = False
else:
color = True
return color
# Задаем координаты первой и второй позиции
k, l, m, n = map(int, input().split())
if checkColor(k, l) == checkColor(m, n):
print('YES')
else:
print('NO')
Объяснение: