Если тебе надо вывести ещё на экран в паскале, то необходимо её записать в одинарных ковычках ' } ' чтобы её напечатать, при английской раскладке клавиатуры нажми шифт + Ъ или шифт + Х
пример вывода скобки на экран: Var a:integer;
Begin
Writeln('{ }');
end.
#include <stdio.h>
int main(void)
{
unsigned int
number;
scanf("%u", &number);
switch(number)
{
case 1:
{
printf("%s\n", "Понедельник");
break;
}
case 2:
{
printf("%s\n", "Вторник");
break;
}
case 3:
{
printf("%s\n", "Среда");
break;
}
case 4:
{
printf("%s\n", "Четверг");
break;
}
case 5:
{
printf("%s\n", "Пятница");
break;
}
case 6:
{
printf("%s\n", "Суббота");
break;
}
case 7:
{
printf("%s\n", "Воскресенье");
break;
}
}
return 0;
}
<u>PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
// 1
var (x,y):=ReadReal2('Введите x и y:');
Writeln((x>0) and (y>0));
// 2
var a,c,d:longint;
Write('Введите число, его квадрат и куб: '); Read(a,c,d);
Writeln((a*a=c) and (a*a*a=d))
end.
<u>Пример</u>
Введите x и y: 3.5 1.8
True
Введите число, его квадрат и куб: 15 225 1225
False
1 кбайт=8000 бит, сл. вес сообщения=1928000 бит
1928000\128000=15.0625 сек