1) Источник информации
2) Приёмник информации
3) Электронная почта
Ответ:
Входы: клавиатура, мышь
Выходы: монитор, принтер, колонки
Объяснение:
Var v,n,d:integer;
begin
v:=650;
write ('Введите количество дней: ');
readln (n);
for d:=1 to n do v:=v-5*d;
if v>0 then writeln ('Через ', n,' дней бабушка обнаружит ',v, ' граммов варенья в банке')
else writeln ('Через ', n,' дней бабушка обнаружит пустую банку')
end.
.txt .amr, .cda, .imelody, .imy, .flac,
Наука о методаз и процессах сбора хранения обработки анализа и оценивания информации