Составить программу Pascal 6. Зная длину окружности колеса автомобиля L можно определить пройденное расстояние автомобилем по формуле S=L*n, где n – количество оборотов. Составьте программу, которая запрашивает радиус колеса R и количество оборотов и рассчитывает пройденное расстояние

на выходе 109

program p_1; var x,y: real; beginwriteln ('vvedite x'); readln(x); writeln ('vvedite y'); readln(y) ; if x=1 then y: =3; {на всякий случай, мало ли по клавише тне никак не можно ставить другие значения. эту строчку можно и }x: =y-x; y: =2*x; x: =2*y+x; y: =y+x/2; writeln(x,'',y); readln; end.

квадрат вписан в круг при условии что r*2(диаметр)> диагонали квадрата 

на qbasic

? "введите 2 числа - радиус круга и сторону квадрата соответсвенно"

input a; b

c=a*2   диаметр

g=sqr(a*a+a*a) диагональ  

if c> g then 1 else 2

1 ? "квадрат вписан в круг"

goto 3

2 ? "квадрат не вписан в круг"

3 end

отсканированный текст является изображением и по сути ничем не отличается, например от фотографии. отсканированный текст нужно распознать специальным софтом, лучше всего с abby fine reader, после этого текст можно редактировать.

началоположить топор в воду закипятить посолить добавить крупы добавить масла съесть кашу, а топор оставить, чтобы доварить в следующий раз