Var
a, b: real;
begin
readln(a, b);
if a <> 5.5 then a := a * 2;
if b <> 5.5 then b := b * 2;
writeln(a, ' ', b );
end.
Вводы и выводы бывают нескольких "видов". Есть простой, к примеру, и с переводом строки. Они различаются тем, как мы будем читать. read(тут должна быть переменная, которую вы считываете). Тут считывается что-то, и затем можно дальше продолжать работать. А readln(тут должна быть переменная, которую вы считываете) уже после считывания переходит на следующую строку. Можно так же подключить файл. Это происходит посредством команд. assign(название текстовой переменной, затем через запятую тут должно быть название файла или путь к нему в кавычках). Затем надо сделать reset(название переменной, с которй связан был ввод); Это простые примеры. Теперь вывод. Тут в принципе, то же самое. write(переменная или текст в кавычках) просто выводит после места, где мы на вводе\выводе остановились, пишет то, что нужно. А есть writeln(). он делает то же самое, затем переходит на следующую строку. Обьясним в примерах. Различие write и writeln
Есть два куска программы.
a:=10;
b:=20;
write(a);
write(b);
И второй.
a:=10;
b:=20;
writeln(a);
writeln(b);
Они различаются лишь четырьмя буквами, но вывод первой будет
1020
А второй
10
20
Что бы, кстати, при первом способе цифры не слипались, можно воспользоваться текстом. Изменим строчку
write(a); на строчку write(a,' '); и тогда вывод будет таким
10 20
Файловый вывод подключается так же. Однако есть различие. Там надо использовать вместо reset - rewrite и все. Ну и естественно, не путаем две переменные ввода и вывода. Вот простые примеры
Дана последовательность, состоящая из 10 чисел [7, 3, 10, 9, 8, 4, 1, 6, 2, 5]. Вы умеете за один ход поменять в ней местами два
Waln
Const
a: array of integer = (7, 3, 10, 9, 8, 4, 1, 6, 2, 5);
begin
var n := 0;
var found := false;
repeat
found := false;
for var i := low(a) to High(a) - 1 do
if a[i] > a[i + 1] then begin
swap(a[i], a[i + 1]);
found := true;
n := n + 1;
end;
until not found;
writeln('Swaps = ', n);
end.
Ответ
Swaps = 30
Птица летит
Птица чирикает
Птица кушает (активные)
Птицу кормят
Птицу купают
За птицей ухаживают (пассивные
Мяч скачет
Мяч укатился в канаву
Мяч попал в корзину (активные)
Мячом играют
Мяч забросили в корзину
Мяч пнули (пассивные)
Велосипед упал
Велосипед сломался
Велосипед поржавел (активные)
На велосипеде катаются
Велосипед чинят
Велосипед чистя (пассивные)
Клавиатура - служит для ввода текстовой информации в компьютер, устройство ввода.
Редактирование текста - это изменение или исправление в нем ошибок, так же применение каких-либо инструментов (шрифты, цвет)
Операционная система - позволяет человеку работать в компьютере, т.к у компа тоже есть свой язык, вот операционная система как бы помогает нам легко производить операции в нем, не имея каких-либо заумных навыков.
