Все категории

4 года назад

Несколько вариантов пожалуйста

Знания

Информатика

1 ответ:

ybond834 года назад

0 0

Программиста и технологп

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

Линейные алгоритмы Сколько времени в минутах затратит школьник на дорогу из школы до стадиона, если известна длина этого расстоя

Афонская Виктория...

Program nau;
var s,m,t: real;
begin
writeln ('введите расстояние и среднюю скорость движения');
readln (s,m);
t:=(s/m)*60;
writeln('время, потраченное на дорогу, в минутах = ',t);
end.

0 0

4 года назад

Решите #2 на языке Паскаль,пожалуйста

otanazar [42]

var vivod,vvod:integer;

begin

readln(vvod);

while(vvod <> 0) do

begin

vivod:=vvod;

vvod := vvod div 10;

end;

writeln(vivod);

end.

0 0

4 года назад

Используя код Цезаря, закодируй следующее слово: школа

Gema2009 [269]

щлпмб
Здесь сдвиг алфавита равен 1 символу.

ъмрнв
Здесь - уже двум. Надеюсь, ты понял алгоритм))

Каждая буква в слове меняется на следующую в ней по алфавиту через n букв, где n - число шагов сдвига
Для буквы я - следующая буква - а.

0 0

4 года назад

Вводятся координаты x y множество точек,последними вводятся значения x=0 y=0. Определить,сколько точек будет расположено во втор

KristinaFilipicheva

var

x, y: real;

k: integer;

begin

k := 0;

Read(x, y);

while (x <> 0) or (y <> 0) do

begin

if (x < 0) and (y > 0) then

k := k + 1;

Read(x, y)

end;

Writeln(k);

end.

0 0

4 года назад

Как нарисовать ромб в программе кумир (черепахой)?

Алла01

И еще после последней строчки
кон

0 0

3 года назад