Помогите 3,5,6,7 нужно написать команды
5-9 класс
|
№3
var a:real;
begin
read (a);
write (a,' - число, которое вы ввели');
end.
№5
var a,b,c:real;
begin
a:=13;
b:=46;
c:=789;
write (a,' ',b,' ',c);
end.
№6
var a,b,c:real;
begin
a:=13;
b:=46;
c:=789;
writeln (a);
writeln (b);
writeln (c);
end.
№7
var p:real;
begin
p:=3.14159265359;
writeln (p:1:5);
end.
Другие вопросы из категории
Дано трехзначное число. Найти число, полученное при перестановке первой и второй цифр заданного числа
Читайте также
таблица(файл вложен).
Вот пример с тремя столбцами и с тремя строчками.Но там нужно как-то по другому немного :
<html>
<head>
<title>Работа с таблицой</title>
</head>
<body>
<table border="2">
</tr>
<tr><thcolspan="2"<первая строка</td></tr>
<td>ячейка</td>
<td>ячейка</td>
</tr>
<tr>
<td> ячейка 1</td>
<td> ячейка 2</td>
</tr>
<tr>
<td> ячейка 1</td>
<td> ячейка 2</td>
</tr>
</table>
</body>
</html>
такая таблица(файл вложен).
начало : <html>
<body>
решение задачи полностью.
2.Дан текст из 600 символов . Известно ,что символы берутся из таблицы размером16*32.Ответ информационный объём текста в битах =5.400бит.нужно написать решение задачи полностью.
команд в нужном порядке
read.writeln.else.to.if и тд которые сможете
Вот пример идеи для программы, в академию поступают какое то количество учеников, нужно написать сколько учеников сдали документы, сколько пришли на экзамен, и сколько учеников кто прошло и не прошло
возможно не возможно создать программу на этой идее, тогда прделагайте свои со своими программами , пожалуйста помогите!