1)
var x,s:real;
begin
readln(x);
s:=cos(x) - sin(x) + abs(x-7) + x*x - 1;
writeln (s)
<span>end.
2)
var x,y,s:real;
begin
readln(x,y);
s:=(x+y)/2;
writeln(s)
<span>end.
3)
var x,y:real;
begin
readln(x);
if x<0 then y:=x*x-5;
if x=0 then y:=3;
if x>0 then y:=x-3;
writeln(y)
<span>end.</span></span></span>
1-5
2-5
3-32
4-6
5-0
6-бесконечно
7-не исполниться
8-3
9-бесконечно
по моему так
Ответ:
как-то так:
#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "RUS");
cout << "Данные какой страны вывести?\n1. Венгрия..." << endl;
int choise;
cin >> choise;
switch choise {
case 1:
cout << "Столица - Будапешт, население - 11 млн. чел." << endl;
case 2:
cout << "Столица - Рим, население - 60 млн. чел." << endl;
case 3:
cout << "Столица - Афины, население - 10 млн. чел." << endl;
case 4:
cout << "Столица - Анкара, население - 55 млн. чел." << endl;
case 5:
cout << "Столица - Каир, население - 53 млн. чел." << endl;
case 6:
cout << "Столица - Катманду, население - 18 млн. чел." << endl;
case 7:
cout << "Столица - Брюссель, население - 10 млн. чел." << endl;
}
system("pause");
return 0;
}
1)
<span>var </span>
<span>A:integer; </span>
<span>Begin </span>
<span>Readln(a); </span>
<span>If a<>0 then </span>
<span>If a<0 then writeln('a<0') else writeln('a>0') </span>
<span>Else writeln('a=0'); </span>
<span>End. </span>
2)
<span>Var </span>
<span>A,M,n:integer; </span>
<span>Begin
</span>readln(m);
readln(n);
<span>If m=n then writeln ('error') else </span>
<span>If m>n then a:=n else a:=m; </span>
<span>If (-20<=a) and (a<10) then writeln('Yes') else </span>
<span>Writeln('No');</span>
<span>End.</span>