Program NoName;
var num: integer;
x, y: real;
Begin
readln(num);
if (num>=10)and(num<=99)then
begin
x := trunc(num/10);
y := (num/10-trunc(num/10))*10;
writeln(x+y);
writeln(x*y);
writeln(y*10+x);
end;
end.
#include<span><iostream> </span>
#include<span><cstdlib> </span>
<span>using namespace std; </span>
<span>int main() </span>
<span>{ </span>
<span>setlocale (0,""); </span>
<span>int k,m,b,i,j,A[5][5]; </span>
<span>for (j=0;j<5;j++) </span>
<span>//Ввод массива </span>
<span>{ </span>
<span>cout«"Введите элементы строки №"«j«" :"«endl; </span>
<span>for (i=0;i<5;i++) </span>
<span>{ </span>
<span>cout«"Введите элемент строки №"«i+1«":"; </span>
<span>cin»A[j][i]; </span>
<span>} </span>
<span>} </span>
<span>//Вывод массива </span>
<span>for(j=0;j<5;j++) </span>
<span>{ </span>
<span>for(i=0;i<5;i++) </span>
<span>{ </span>
<span>cout«A[j][i]«" "; </span>
<span>} </span>
<span>cout«endl; </span>
<span>} </span>
Var
}
r,d:integer;rar
}
begin
writeln('введи значение радиуса ',r);
readln(r);
d:=r*2;
writeln('диаметр ',d);
end.
Oldschool...
- Поле ввода текста <INPUT type=text> представляет собой прямоугольное поле, предназначенное для ввода одной строки текста.
- Флажки <INPUT type=checkbox>, или кнопки с независимой фиксацией, служат для многокомпонентного выбора.
- Контейнер <SELECT>…</SELECT> используется для создания раскрывающегося списка
- Контейнер <TEXTAREA>…</TEXTAREA> задает многострочное текстовое окно.
