М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
марина1087
марина1087
18.12.2021 06:00 •  Информатика

В ЕДИНСТВЕННОЙ СТРОКЕ ЗАДАНЫ ЧЕТЫРЕ ЧИСЛА A,B,C,D (1

👇
Открыть все ответы
Ответ:
ghukasyangoar
ghukasyangoar
18.12.2021

Эта задача решается с конца. У всех девочек есть по 32 яблока, так получилось после хода Насти, то есть до её хода у Кати, Лизы и Маши было по 16 (и Настя дала им по 16), а у самой Насти было 80 (16+16+16+32 = 80).

Запишем в виде таблички:

--К-- --Л-- --М-- --Н--

 16     16    16     80

 32    32    32    32

До Машиного хода у Кати и Лизы было по 8, у Насти 40, у самой Маши 8+8+40+16=72

--К-- --Л-- --М-- --Н--

 8       8    72     40

 16     16    16     80

 32    32    32    32

До хода Лизы:

--К-- --Л-- --М-- --Н--

 4     68   36     20  

 8       8    72     40

 16     16    16     80

 32    32    32    32

До хода Кати, то есть сначала:

--К-- --Л-- --М-- --Н--

66    34    18     10  

 4     68   36     20  

 8       8    72     40

 16     16    16     80

 32    32    32    32


ответ: Катя = 66, Лиза = 34, Маша = 18, Настя = 10


За столом сидят катя, лиза, маша и настя, и у каждой из них есть персики. сначала катя отдала каждой
4,6(68 оценок)
Ответ:

язык программирования любой?

пишу на Python:

s = str(input())

s = sorted(s[:len(s)-1].split(', '))

for word in s:

print(word, ' ', end='')

Pascal:

var s, copy_s, word_s:string;

i, n, count:integer;

a:array of string ;

begin

count:=0;

write('Введите перечисление слов через запятую без пробелов, в конце поставьте точку: ');

readln(s);

copy_s:= s;

while pos(',', copy_s) > 0 do begin

n:= pos(',', copy_s);

delete(copy_s, n, 1);

count:=count+1;

end;

count:= count + 1;

SetLength(a, count);

for i:=1 to count-1 do begin

n:= pos(',', s);

word_s:= copy(s, 1, n-1);

delete(s, 1, n);

a[i]:=word_s;

end;

word_s:= copy(s, 1, length(s)-1);

a[count]:= word_s;

for i:=1 to count-1 do

if a[i] > a[i+1] then begin

word_s:=a[i];

a[i]:=a[i+1];

a[i+1]:=word_s;

end;

for i:=1 to count do

writeln(a[i]);

end.

4,4(59 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ