1. var f_name,s_name:string; begin writeln('Введите имя'); readln(f_name); writeln('Введите фамилию'); readln(s_name); writeln('Доброе утро ',f_name,' ',s_name); end.
2. var s,a:real; i:integer; begin s:=0; for i:=1 to 5 do begin writeln('Введите число №',i); readln(a); s:=s+a; end; writeln('Сумма=',s) end.
3. var s,a:real; i:integer; begin s:=1; for i:=1 to 3 do begin writeln('Введите число №',i); readln(a); s:=s*a; end; writeln('Произведение=',s); end.
4. var a, b, c, max: integer; begin write ('Введите три числа: '); readln (a, b, c); if a >= b then max := a else max := b; if c > max then max := c; writeln ('Максимальное число: ', max); end.
відповідь: function showresult(choise){
var n1=parsefloat(document.getelementbyid('num1').value);
var n2=parsefloat(document.getelementbyid('num2').value);
var r;
var c=choise;
switch(c)
{
case '1':
r=n1+n2;
break;
case '2':
r=n1-n2;
break;
case '3':
r=n1*n2;
break;
case '4':
r=n1/n2;
break;
case '5':
r=n2*100/n1;
break;
default:
break;
}
document.getelementbyid('result').value=r;
}
calculator
my calculator first number second number result+
-
*
/
%
пояснення:
var
f_name,s_name:string;
begin
writeln('Введите имя');
readln(f_name);
writeln('Введите фамилию');
readln(s_name);
writeln('Доброе утро ',f_name,' ',s_name);
end.
2.
var
s,a:real;
i:integer;
begin
s:=0;
for i:=1 to 5 do
begin
writeln('Введите число №',i);
readln(a);
s:=s+a;
end;
writeln('Сумма=',s)
end.
3.
var
s,a:real;
i:integer;
begin
s:=1;
for i:=1 to 3 do
begin
writeln('Введите число №',i);
readln(a);
s:=s*a;
end;
writeln('Произведение=',s);
end.
4.
var
a, b, c, max:
integer;
begin
write ('Введите три числа: ');
readln (a, b, c);
if a >= b then
max := a else
max := b;
if c > max then
max := c;
writeln ('Максимальное число: ', max);
end.