15. при работе с таблицей адресом ячейки называют? а. её букву и номерб. её номер и буквув. уникальный номерг. город, улицу и дом16. результатом выполнения формулы «срзнач(a1: c3)» будет ответ: (срзнач — возвращает среднее число, сумма выбранных чисел поделённоена их количество)5ab2 а1+b17 c2-a1с1-а2сумм(в1: 02)срзнач(a1: c3)3б. 10в. 5г. 017. интернет это? a. всемирная свалкаб. сеть из компьютеровв. общая мировая сетьг. веб страница18. браузер это? а. программа для открытия аудио, видеоб. программа для создания веб страницв. программа для скачивания файловг. программа для просмотра веб страниц19. электронная почта это? а. специальная веб страница где можно отправлять и получатьэлектронные письма
var a:array[1..6] of integer;
var i,s: integer;
begin
i:=0;a[1]:=500;a[2]:=100;a[3]:=10;a[4]:=5;a[5]:=2;a[6]:=1;
writeln('Введите целое число,сумму денег:');
readln(s);
while s<>0 do
begin
if s>=a[1] then begin
s:=s-a[1]; i:=i+1; end;
if (s>=a[2]) and (s<a[1]) then begin s:=s-a[2]; i:=i+1; end;
if (s>=a[3]) and (s<a[2]) then begin s:=s-a[3]; i:=i+1; end;
if (s>=a[4]) and (s<a[3]) then begin s:=s-a[4]; i:=i+1; end;
if (s>=a[5]) and (s<a[4]) then begin s:=s-a[5]; i:=i+1; end;
if (s>=a[6]) and (s<a[5]) then begin s:=s-a[6]; i:=i+1; end;
end;
Writeln('Наименьшее число купюр =',i);
end.