Ответы
Ответ дал:
0
var a,x:integer;
begin
write ('Введите число: ');
readln (a);
if a > 9 then x:=a+8
else x:=a-8;
writeln (x)
end.
begin
write ('Введите число: ');
readln (a);
if a > 9 then x:=a+8
else x:=a-8;
writeln (x)
end.
Ответ дал:
0
Блок-схему в паскаль перенести очень просто. Каждый блок заменяем соответствующим оператором языка. Исключение могут составлять только описания переменных, которые на блок-схемах отсутствуют: эти описания мы вставляем перед первым обращением к переменной (при помощи var).
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadReal('a=');
var x:real;
if a>9 then
x:=a+8
else
x:=a-8;
Writeln('x=',x)
end.
При наличии опыта можно записать программу более компактно, поскольку современные алгоритмические языки - это более ёмкий и сжатый способ представления алгоритма по сравнению с блок-схемами, ориентированными на излишне подробное членение.
Вот та же самая программа в более компактном виде:
begin
var a:=ReadReal('a=');
if a>9 then Writeln('x=',a+8) else Writeln('x=',a-8);
end.
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadReal('a=');
var x:real;
if a>9 then
x:=a+8
else
x:=a-8;
Writeln('x=',x)
end.
При наличии опыта можно записать программу более компактно, поскольку современные алгоритмические языки - это более ёмкий и сжатый способ представления алгоритма по сравнению с блок-схемами, ориентированными на излишне подробное членение.
Вот та же самая программа в более компактном виде:
begin
var a:=ReadReal('a=');
if a>9 then Writeln('x=',a+8) else Writeln('x=',a-8);
end.
Ответ дал:
0
https://znanija.com/task/28739946 - вот пример такого.
Ответ дал:
0
Сотни, но мы же не все обсуждаем! :-)
Ответ дал:
0
Верю, что про ГОСТ не знали. Кстати, именно поэтому ГОСТ запрещает писать внутри условных графических элементов конструкции, взятые из конкретного языка программирования, например, указывать знак присваивания в виде := без предварительного описания, что так автор обозначает присваивание.
Ответ дал:
0
Не все. Какие увидим.
Ответ дал:
0
:-)
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад