Задание по информатике на тему: вставка и замена символа.
задание: вставка
Прснльнй кмпьютер: сстемнй блк (матринск плт, цнтрльнй прцсср, пртвн пмть, жсткй дск), ВНШН СТРА, клвтр, мшь, мнтр, прнтр, кстчск клнк).
я решила всё краме выделенных слов

на выходе 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.

a в квадрате плюс b в квадрате:

  sqr(a) + sqr(b);

№1

program z1;

var n: integer;

begin

write ('введите число n: ');

readln(n);

if (n mod 2 = 0) and (n div 100 < 1) and (n > 9) then write('данное число является четным двузначным') else if  (n div 100 < 1) and (n > 9) then write ('данное число не четное двузначное');

end.

№2

program z2;

var a, b, c, k: integer;

begin

k: =0;

writeln ('введите числа a, b и c: ');

readln(a,b,c);

if a< 0 then k: =k+1;

if b< 0 then k: =k+1;

if c< 0 then k: =k+1;

write('количество отрицательных чисел: ',k)

end.

s=v0*t+at^2\2

s=0*5+2*5^2\2=50\2=25м