C#
1. с клавиатуры ввести два числа x и z. вывести на экран целую часть и остаток от деления
числа x на z. предусмотреть проверку z ≠ 0. результаты вывести на экран. предусмотреть
вывода подсказок для пользователя. пример: "введите значение x и z! "
2. вычислить значение выражения n! * (n + 1)! от заданного значения n (значение n вводится с
клавиатуры).
3. вычислить значения выражений. начальными значениями переменных c и d для каждого выражения
являются: c = 2 и d = 1 в ответе указать: значение и тип результата, конечное значение заданных
переменных.
а) ++ c + d ++
б) c ++ * 2! = ++ d * 2
в) (d < 0) || (--c < 2)? -c: d
var a:integer;
label h;
begin
h:
begin
writeln('Введите количество палочек: ');
readln(a);
if (a<=0) then goto h
else
a:=a+3;
writeln('У Тани стало ', a, ' палочек');
end;
readln;
end.
Program schet;
var a,b:integer;
begin
a:=2015;
writeln('Сколько лет проводится олимпиада?');
readln(b);
a:=a-b;
writeln('Первая олимпиада была проведена в ',a,' году.');
readln;
end.
Program schet;
var a,b,c,i:integer;
begin
writeln('Сколько семечек посадил Пятачок?');
readln(a);
writeln('Сколько семечек не выросло?');
readln(b);
a:=a-b;
writeln('Сколько не плодоносных яблонь?');
readln(c);
a:=a-c;
writeln('На скольки яблонях вкусные яблоки?');
readln(i);
a:=a-i;
if (a<0) then writeln('Выросло 0 яблонь с невкусными яблоками.')
else writeln('Выросло ',a,' яблонь с невкусными яблоками.');
readln;
end.
Program schet;
var a:real;
begin
writeln('Введите число, которое нужно округлить:');
readln(a);
a:=round(a);
writeln('ответ после округления: ',a);
readln;
end.