1. Сколько жителей в самом крупном по численности населения городе Египта? ответ на этот вопрос (в тыс. чел.) запишите в ячейку F2 таблицы.
2. Сколько городов Египта имеют жителей больше, чем средняя численность населения
городов, представленных в таблице? ответ на этот вопрос запишите в ячейку F3.
3. Постройте круговую диаграмму, отображающую соотношение количества городов
Швейцарии, Канады и Германии, представленных в таблице. Левый верхний угол
диаграммы разместите вблизи ячейки G6. В поле диаграммы должна присутствовать
легенда (обозначение, какой сектор диаграммы соответствует каким данным) и числовые
значения данных, по которым построена диаграмма.
// PascalABC.NET 3.2, сборка 1383 от 09.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
var k:=Arr(1000,100,50,10); // массив с достоинствами купюр
var s:=ReadInteger('Введите сумму:'); // сумма к оплате
Writeln('Уплатить:');
var i:=0;
while s>0 do begin
var p:=s div k[i];
if p>0 then Writeln(p,' шт. достоинством ',k[i],' руб.');
s:=s mod k[i]; i+=1
end;
end.
Пример
Введите сумму: 1630
Уплатить:
1 шт. достоинством 1000 руб.
6 шт. достоинством 100 руб.
3 шт. достоинством 10 руб.
1) заходишь в МОЙ КОМПЮТЕР ищешь там папку, в которой эта программа и удаляешь эту папку полностью.
2)заходишь в МОЙ КОМПЮТЕР, находишь папку этой программы, там будет среди прочих файлов значёк (обычно похож на корзину для мусора) открываешь его, он тебя спросит: "Вы действительно хотите удалить такую-то программу?" нажимаешь "ОК".
3) если программа имеет вредоносный файл-вирус, то он может не давать удалить себя и выдавать ошибку при удалении. В таком случае стоит с антивирусника просканировать эту папку и удалить вирус, после этого можете удалять.