Какие роботы есть в Паскале ABC?

Знания

Информатика

1 ответ:

Screamer64 года назад

0 0

Да обычный вроде...как в чертёжнике. Uses robot; Вот так подключается, если не ошибаюсь.

Читайте также

Срочно, помогите, информатика 10 класс

Вика0908

Ответ:

program Calc;

var

k, x, a, c, y: Double;

begin

Write ('k, x, a, c = ');

ReadLn (k, x, a, c);

if x > 0 then begin

y := k * Sqr (x);

WriteLn ('y = ', y);

end else if a + c <> 0 then begin

y := - x / (a + c);

WriteLn ('y = ', y);

end else

WriteLn ('деление на ноль');

ReadLn;

end.

0 0

3 года назад

Дано целое число. Напишите программу, которая уменшает 2 модуль этого числа и выводит на экран манитора резельтат.

NMarena [264]

Program test;
var number: integer;
begin
write('Enter the number: ');
readln(number);

number:=abs(number)-2;
writeln(number);

readln;
end.

0 0

4 года назад

Что можно отнести к свойствам информации: a.Аналагичность b.Bероятность c.Достоверность d.Используемость e.Полезность f.Полноту

Перепелица [50]

С- достоверность !!!!!!

0 0

4 года назад

Помогите пожалуйста сделайте так чтобы если длинна фамилий одинакова чтобы выводилась не про одинаковую длинну без лишнего progr

Koshevoyvlad

if(c==d) then writeln("Твой текст");

0 0

4 года назад

Ввести N чисел с клавиатуры подсчитать количество положительных чисел

diptatextse1980

Файл во вложениях. И на будущее, указывайте язык программирования.

p.s. комментарии и некоторый текст на русском языке, который не отобразился:
//k - количество положительных чисел
//n - количество чисел
writeln('Количество положительных чисел: ', k, '.');

0 0

1 год назад