Var
k:integer;
begin
writeln('Введите свет светофора: ');
readln(k);
case k of
1: writeln('Ждать');
2: writeln('Приготовиться');
3: writeln('Идти');
else writeln('Нет света с таким номером');
end;
end.
Var
sum, x : integer;
begin
sum := 0;
repeat
read (x);
if (x mod 6 = 0) and (x mod 10 = 2) then sum := sum + x;
until x = 0;
write (sum);
end.
1) 11 2)4 3)13 я не совсем уверена но вроде да
Поблагодарил своих родителей
#include<iostream>
using namespace std;
int main()
{
double d;
cin>>d;
cout<<"\nS="<<2*3.14*(d/4); // если нужна площадь , то заменить на cout<<"\nS="<<3.14*(d/4)*(d/4);
}