#include <iostream>
#include <ctime>
using namespace std;
int main ()
{
<span> setlocale (0,"russian");</span><span>
srand (time(NULL));
</span><span> short A[3],B[3];</span><span>
int a=0,b=0;</span><span>
cout << "Случайное заполнение массивов: " << endl;
</span><span> cout << "1-ый: ";
</span><span> for (short i=0;i<3;i++)</span><span>
{
</span><span> A[i]=rand()%20-9;</span><span>
cout << A[i] << ' ';</span><span>
a+=A[i];
</span><span> }
</span><span> cout << endl << "2-ой: ";
</span><span> for (short i=0;i<3;i++)</span><span>
{
</span><span> B[i]=rand()%20-9;</span><span>
cout << B[i] << ' ';</span><span>
b+=B[i];
</span><span> }
</span><span> cout << endl << "Произведение суммы данных массивов: " << a*b;</span><span>
system ("PAUSE>>VOID");</span><span>
return 0;
</span><span>}</span>
Var r,w,s:integer;
begin
writeln('Введите исходные данные:');
write('Величина вклада (руб.): ');
readln(r);
write('Ежемесячная величина дохода (руб) ');
readln(w);
s:=r+3*w;
write('Сумма вклада по окончании трех месяцев: ',s,' руб.');
s:=r+6*w;
write('Сумма вклада по окончании шести месяцев: ',s,' руб.');
s:=r+12*w;
write('Сумма вклада по окончании года: ',s,' руб.');
end.
Program z1;
uses GraphABC;
begin
setpencolor(clgreen);
line(30,50,60,20);
line(60,20,90,50);
line(90,50,30,50);
line(30,80,60,50);
line(60,50,90,80);
line(90,80,30,80);
line(30,110,60,80);
line(60,80,90,110);
line(90,110,30,110);
floodfill(60,40,clgreen);
floodfill(60,70,clgreen);
floodfill(60,100,clgreen);
end.
открыть,изменит,создать,переименовать,копировать,создать ярлык,закрыть,свернуть,отправить,вырезать,удалить,свойства
