Составьте программу, которая вычисляет расстояние между двумя в километрах к, приняв, что 5 миль равны 8 км. город а находится в х милях от москвы. значения а и х вводятся с клавиатуры.

241

339

Посмотреть ответы 2

Ответы на вопрос:

Катя0Кот

Информатика

4,6(94 оценок)

Var a: string; x, k: real; begin write('nazvanie goroda: '); readln(a); write('rasstoyanie ot g. ', a, ' do moskvy v milyah: ' ); readln(x); k : = x*8/5; writeln('gorod ', a, ' nahoditsya v ', k: 4: 2, ' km. ot moskvy.'); readln; end.

HELP2606

Информатика

4,8(36 оценок)

Program zwezda; uses crt; var s: string; i, len: integer ; begin clrscr; write('ввод строки: '); readln(s); clrscr; writeln ('‘строка: ', s); writeln; writeln ('первый символ: ', s[1]); writeln; len: =length(s); writeln('посдедний символ: ',s[len]); writeln; for i: =2 to len -1 do s[i]: ='*'; writeln('результат: ',s); readln; end.