<h2>Задание 1</h2>
(смотри первую прикреплённую фотографию)
<h2>Задание 2</h2>
(смотри вторую прикреплённую фотографию)
Если код второго задания для Вас "сложен", то, извините, Вам придётся для работы каждого типа с каждым писать отдельные перегрузки:
float и int, double и int, float и double, size_t и int. В общем - таких типов очень много и полноценный калькулятор у Вас выйдет на 100+ строк.
Шаблоны изучаются вначале, так как позволяют избежать вот таких ситуаций.
<span>program n1;
uses crt;
var aw:array[1..10] of integer;
i,w,g:integer;
begin
g:=0;
w:=10;
for i:=0+1 to w do begin
aw[i]:=random(100);
write(aw[i]:6);
end;
writeln();
write('Чот');
for i:=0+1 to w do begin
if aw[i] mod 2 = 0 then g:=g+1; end; write('Всего чотных чисел ',g);
writeln();
write('Не чот');
g:=0;
for i:=0+1 to w do begin
if aw[i] mod 2 > 0 then g:=g+1;end; write('Всего не чотных чисел ',g) ;
end<span>.
только в столбик
</span></span>
===== PascalABС.NЕТ =====
begin
ReadArrInteger('Вводите:', ReadInteger('n ='))
end.
Был в каталоге С:\Музыка\Хиты
1. Сначала опустился на один уровень вниз в каталог Ретро => С:\Музыка\Хиты\Ретро
2. Затем поднялся на один уровень вверх, проще говоря, вернулся назад в С:\Музыка\Хиты
3. Спустился на один уровень вниз в каталог Лучшие => С:\Музыка\Хиты\Лучшие и здесь нашел файл.
Полный путь - С:\Музыка\Хиты\Лучшие\Белые_розы.mp3