написать программу на языке pascal то что изображено на картинке

вот эту еще сможешь сделать?http://znanija.com/task/19071233

vara, s1, s2, v:real;beginread(a);s1 := a*a;V := a*a*a;s2 := 6 * a * a;writeln(s1, ' ', s2, ' ', V);end.