Задание с фиксированным ответом. Попробуйте подсчитать, какое количество компьютеров будет заражено почтовым вирусом после его четвертой саморассылки, если в адресных книгах всех пользователей содержится по 10 адресов электронной почты.
Ответы
Ответ дал:
0
//PascalABC.NET версия 3.4.0.1677 от 17.06.18
//Если программа не запускается, то обновите версию
begin
var zarazheno := 1;
var sum := zarazheno;
for var i := 1 to 4 do
begin
zarazheno *= 10;
sum += zarazheno;
WritelnFormat('{2} Новозараженно = {0}, всего заражено = {1}', zarazheno, sum, i);
end;
end.
Вывод
1 Новозараженно = 10, всего заражено = 11
2 Новозараженно = 100, всего заражено = 111
3 Новозараженно = 1000, всего заражено = 1111
4 Новозараженно = 10000, всего заражено = 11111
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад