Регистрация
arkadyhmp074l6
24.04.2023 12:59
Информатика
Есть ответ 👍

сделать задачу в паскале

269
453
Посмотреть ответы 2

Ответы на вопрос:

додо7
додо7
4,5(51 оценок)

// PascalABC.NET 3.6

begin

 var n := 20;

 var a := ArrRandom(n, 2, 5);

 a.Println;

 var b := ArrRandom(n, 2, 5);

 b.Println;

 var c := ArrRandom(n, 2, 5);

 c.Println;

 var s := 0;

 for var i := 0 to n - 1 do

   if (a[i] = b[i]) and (b[i] = c[i]) then

     s += 3 * a[i];

 Print(s)

end.

fantomidri
fantomidri
4,4(75 оценок)
№1 фон страницы , как правило, в .css файле например: body{         background-image: url(background.jpg);         background-repeat: no-repeat;         background-position: center center;         background-attachment: fixed;           background-size: cover;           background-color: #fff; } №2 расширение может быть любым №3 body{           < img src="file.jpg"> } №4 указываешь путь до папки: body{           < img src="files/logo.svg"> }

Популярно: Информатика