Program spartakiada;
var
a: array [1..3] of byte;
i, min: byte;
begin
min := 100;
for i := 1 to 3 do
begin
readln(a[i]);
if a[i] < min then min := a[i];
end;
writeln(min);
<span>end.</span>
Ответ:
// ConsoleApplication1.cpp : This file contains the 'main' function. Program execution begins and ends there.
//
#include <iostream>
#include <vector>
using std::cout;
int main()
{
std::vector<int> ints = { 1 , -2, -3, -4, 5, 6, -7, -8, -9, 10 };
cout << "vector before transformation: ";
for (auto integer : ints) {
cout << integer << " ";
}
cout << std::endl;
for (std::size_t i = 1; i < ints.size(); ) {
if (ints[i] < 0) {
ints.erase(ints.begin() + i);
i += 1;
continue;
}
i += 2;
}
cout << "vector after transformation: ";
for (auto integer : ints) {
cout << integer << " ";
}
cout << std::endl;
}
Объяснение:
По условию создаем вектор, удаляем элементы из вектора, если число ниже 0, движемся через один элемент по вектору ¯\_(ツ)_/¯
<span>Словосочета́ние — это соединение двух или нескольких
знаменательных слов, связанных по смыслу и грамматически, служащее для
расчленённого обозначения единого понятия (предмета, качества, действия и
др.).</span>
Program pr;
uses crt;
Var a, b, p, s:real;
Begin
Writeln('Введите сторону a');
readln(a);
Writeln('Введите сторону b');
readln(b);
s:=a*b;
p:=2*(a+b);
Writeln('Площадь = ', s);
Writeln('Периметр = ', p);
readln;
<span>end.</span>